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This manual describes the p-System Assembler. 
The assemblers which accorrpany this manual 
enable you to produce assembly language code for 
any one of the following processors: 

LSI-ll/PDP-11 

Z80 

6502 

6800 

8080 

9900 

6809 

Z8 

68000 

8086/8087/8088 

The assenbly language progranming details for 
these processors isn't covered in this manual. 
You should use a manual which describes the 
processor you are programming for along with 
this manual. (See Chapter 2.) 

You can use the p-System to develop assembly 
language programs to provide: 

1, Assembly language procedures to run under 
control of a host prograin; or 

2. Stand-alone assembly language programs to use 
outside of the operating system's 
environment. 
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The assemblers, in conjunction with the system 
linker and some support programs, give you these 
capabilities. 

You should use this reference manual in 
conjunction with the processor software manual 
that supports your machine. For information 
concerning differences from the processor's 
standard software syntax, refer to Chapter 2. 

This manual is organized as follows. Chapter 1, 
"The Assembler," presents detailed information 
which applies to the assembler in general. 
Chapter 2, "Processor-Specific Information," 
provides information that is specific to each 
processor with a section for each assembler. 

Appendix A describes the linker which canbines 
separately assembled code files and can also 
link a high-level host program with assembled 
routines. 

Appendix B covers the Compress utility. This 
utility allows you to produce a relocatable or 
absolute assembled object code file, enabling it 
to be run outside of the p-System environment - 

Appendix C contains some typical 8086 routines. 
These examples demonstrate how to interface with 
Pascal program from assembly language. 
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Appendices D through M lists the assembler 
syntax errors for each processor . 

Appendix N shows the value of NIL used by each 
processor. 



vii 



TABLE 
O F 

CONTENTS 



THE ASSEMBLER 1-3 

INTRODUCTION 1-3 

Assembly Ijanguage Definition 1-3 

Assembly Language Applications 1-4 

GENERAL INFORMATION 1-5 

Object Code Format 1-5 

Byte Organization 1-5 

Word Organization 1-5 

Source Code Format 1-6 

Character Set 1-6 

Identifiers 1-6 

Predefined Symbols and Identifiers • 1-7 

Character Strings 1-8 



Table of Contents 



Constants 1-8 

Binary Integer Constants 1-8 

Decimal Integer Constants 1-9 

Hexadecimal Integer Constants .... 1-9 

Octal Integer Constants 1-10 

Default Integer Constants 1-10 

Character Constants 1-10 

Assembly Time Constants 1-11 

Expressions 1-11 

Relocatable and Absolute 1-12 

Linking and Restrictions 1-12 

Arithmetic h Logical Operators . • . 1-13 

Subexpression Grouping 1-15 

Examples 1-16 

Source Statement Format 1-17 

Label Field 1-17 

Standard Label Usage 1-17 

Local Label Usage 1-18 

Opcode Field 1-20 

Operand Field 1-20 

Ccxnment Field 1-20 

Source File Format 1-21 

Assembly Routines 1-21 

Global Declarations 1-22 

Absolute Sections 1-22 



Table of Contents 



ASSEUffiLER DIRECTIVES 1-25 

Procedure-Delimiting Directives • . • . 1-28 

Data and Constant Definitions 1-33 

Location Counter Modification 1-38 

Listing Control Directives 1-39 

Pi^ograjTi Linkage Directives 1-47 

Conditional Assembly Directives . . , . 1-52 

Macro Definition Directives 1-53 

Miscellaneous Directives 1-55 

CONDITIONAL ASSEMBLY 1-59 

Conditional Expressions 1-60 

MACRO lAT^GUAGE 1-61 

Macro Definitions • , . 1-62 

Macro Calls 1-63 

Paraineter Passing 1-63 

Scope of labels in Macros 1-65 

Local Labels as Macro Parameters • • 1-66 

PROGRAM LINKING & RELOCATION 1-68 

Program Linking Directives 1-71 

Host Communication Directives . . • • 1-72 
External Reference Directives .... 1-73 
Program Identifier Directives .... 1-74 

Linking Program Modules 1-75 

Linking with a Pascal Program .... 1-75 
Parameter Passing Conventions . - . 1-78 
Variable Parameters 1-79 



Table of Contents 



Value Parameters 1-80 

String and Byte Array Paraineters • . 1-81 

Example of Linking to Pascal 1-83 

Stand-Alone Applications 1-84 

Assembling 1-85 

Executing Absolute Code Files . . . 1-86 

OPERATION OF THE ASSEMBLER 1-89 

Support Files 1-89 

Setting Up Input And Output Files . . 1-90 

Responses to Listing Prompt 1-91 

Output Modes 1-93 

Responses to Error Pronpt 1-94 

Miscellany 1-95 

ASSEMBLER OUTPUT 1-97 

Source Listing 1-98 

Error Messages 1-99 

Code Listing 1-99 

Forward References 1-100 

External References 1-101 

Multiple Code lines 1-101 

Symbol Table 1-102 

Example Assembled Listing 1-103 



Table of Contents 



PROCESSOR-SPECIFIC INFORMATION 2-3 

INTRODUCTION 2-3 

LSI-ll/PDP-11 ASSEMBLER 2-4 

Syntax Conventions 2-4 

Sharing PME Resources 2-4 

Memory Organization 2-4 

Default Constant and List Radices • . , 2-4 

Z80 ASSEMBLER 2-5 

Syntax Conventions 2-5 

Sharing PME Resources 2-5 

Memory Organization 2-5 

Default Constant and List Radices . . . 2-6 

6502 ASSEMBLER 2-7 

Syntax Conventions 2-7 

Sharing FME Resources 2-8 

Memory Organization 2-8 

Default Constant and List Radices . • . 2-8 

6800 ASSEMBLER 2-9 

Syntax Conventions 2-9 

Sharing FME Resources 2-10 

Memory Organization 2-10 

Default Constant and List Radices , . 2-10 



Table of Contents 



8080 ASSEMBLER 2-11 

Syntax Conventions 2-11 

Sharing FME Resources 2-11 

Memory Organization 2-11 

Default Constant and List Radices . . 2-11 

9900 ASSEMBLER 2-12 

Syntax Conventions 2-12 

Sharing FME Resources 2-12 

Memory Organization 2-12 

Default Constant and List Radices . • 2-13 

6809 ASSEMBLER 2-14 

Syntax Conventions 2-14 

Sharing FME Resources 2-15 

Memory Organization 2-15 

Default Constant and List Radices . . 2-15 

Z8 ASSEMBLER 2-16 

Syntax Conventions 2-16 

Symbols 2-16 

Niomeric Constants 2-16 

Predefined Constants 2-16 

Sharing FME Resources 2-17 

Memory Organization 2-17 

Default and List Radices 2-17 



Table of Contents 



8086/8088/8087 ASSETOLER 2-18 

Syntax Conventions 2-18 

Sharing PME Resources 2-24 

Calling and Returning 2-24 

Accessing Parameters 2-25 

Register Usage 2-26 

Memory Organization 2-27 

Default Constant and List Radices . . 2-28 

68000 ASSEMBLER 2-29 

Syntax Conventions 2-29 

Sharing PME Resources . . • 2-31 

Memory Organization 2-33 

Default Constant and List Radices • . 2-33 

APPENDICES A-1 

A : THE LINKER A-3 

B : THE COMPRESS UTILITY A-7 

C : CODING EXAMPLES A-13 

D: 6502 SYNTAX ERRORS A-39 

E : 6800 SYNTAX ERRORS A-42 

F: 6809 SYNTAX ERRORS A-45 

F : 8080 SYNTAX ERRORS A-48 

H: 9900 SYNTAX EPEORS A-51 

I: LSI-ll/PDP-11 SYNTAX ERRORS A-54 

J : Z8 SYNTAX ERRORS A-57 

K: Z80 SYNTAX ERRORS A-60 

L: 8086/88/87 SYNTAX ERRORS A-63 



Table of Contents 

M : 68000 SYNTAX ERRORS A-68 

N: NIL POINTER VALUES A-71 



INDEX 



I-l 



CHAPTER 1 

THE ASSEMBLER 



The Assembler 



INTRODUCTION 

This chapter describes the p-System Assembler. 
It covers assembler-related concepts, assembler 
directives, and assembler operations. Other 
topics covered here include: 

• Linking assembled routines with host 
compilation units. 

• Assembled listings. 

• Error messages. 

• Sharing FME Resources. 



Assembly Language Definition 

An assembly language consists of symbolic 
naines that can represent machine instructions, 
memory addresses, or prograiT) data. The main 
advantage of assembly language programming 
over machine coding is that programs can be 
organized in a more readable fashion, making 
them easier to understand. 
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An assembler translates an assembly language 
program, called source code, into a sequence 
of machine instructions, called object code. 
Assemblers can create either relocatable or 
absolute object code. Relocatable code 

includes information that allows a loader to 
place it in any available area of nr>emory, 
while absolute code must be loaded into a 
specific area of memory. Symbolic addresses 
in programs that are assembled to relocatable 
object code are called relocatable addresses. 



Assembly Language Applications 

Using the p-System, you can develop: 

1. Assembly language procedures to be used 
under a host program; or 

2. Stand-alone assembly language programs for 
use in a different operating system 
environment. 
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GENERAI. INFORMATION 



Object Code Format 



Byte Organization 

A byte consists of eight bits. These bits 
may represent eight binary values or a 
single character of data. The bits may also 
represent a one-byte machine instruction or 
a number that is interpreted as either a 
signed two's complement number in the range 
of -128 to 127 or an unsigned number in the 
range of 0 to 255. 



Word Organization 

A word consists of 16 bits or 2 adjacent 
bytes in memory. A word may contain a 
one-word machine instruction, any 
combination of byte quantities, or a number 
that may be interpreted as either a signed 
two's complement number in the range of 
-32,768 to 32,767 or an unsigned number in 
the range of 0 to 65,535. 
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Source Code Format 



Character Set 

Use the following characters to construct 
source code: 

S Uppercase and lowercase alphabetic 
characters: A through Z, a through z 

M Niimerals: 0 through 9 

• Special symbols: |@#$%"&*()<> 

-[].,/;:"'+-=?_ 

• Space ( ' ' ) character and tab character 

Identifiers 

Identifiers consist of an alphabetic 
character followed by a series of 
alphanumeric characters and /or underscore 
characters. The underscore character isn't 
significant* Only the first 8 characters of 
an identifier are significant. 
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Use identifiers in: 

• Label and constant definitions, 

S Machine instructions, assembler 
directives, and macro identifiers. 

• Label and constant references. 



FoTtnArray 
FOR«_ARRAY 
- f ormarray 
... all denote the same item. 



Predefined Symbols and Identifiers 

Predefined identifiers are reserved by the 
assembler as symbolic naines for machine 
instructions and registers. Don't use 
them as names for labels, constants, or 
procedures. Also, the dollar sign, "$," 
is predefined to specify the location 
counter. When used in an expression, the 
dollar sign represents the current value 
of the location counter in the program . 



1-7 



The Assembler 



Character Strings 

Write a character string as a series of 
ASCII characters delimited by double quotes. 
A string may contain up to 80 characters, 
but can't cross source lines. You can embed 
a double quote in a character string by 
entering it twice; for example, "This 
contains ""embedded"" double quotes," The 
assembler directive .ASCII requires a 
character string for its operand. 

Strings also have limited uses in 
expressions. 



Constants 



Binary Integer Constants 

Write a binary integer constant as a 
series of bits or binary digits (0 through 
1) followed by the letter 'T'. The range 
of values is 0 to 1111111111111111, or 0 
to 11111111, if a byte constant. 

OT 

01000100T 
11101T 
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Decimal Integer Constants 



Write a decimal integer word constant as a 
series of numerals (0 through 9) followed 
by a period. Its range of values is 
-32768 to 32767 as a signed two's 
conplement number. As a byte constant, 
its range of values is -128 to 127 as a 
signed two's complement number or 0 to 255 
as an unsigned number. 



001. 
256. 
^4096 . 



Hexadecimal Integer Constants 



Write a hexadecimaJ integer word constant 
as a series of up to four significant 
hexadecimal numerals (0 through 9, A 
through F) followed by the letter 'H'. 
The leading nume^ral of a hexadecimal 
constant must be a numeric character. The 
range of values is 0 to FFFF. These are 
examples of valid hexadecimal constants: 



OAH 

100H 

PFFFE!H 




Leading zero Is requi red' here 



Byte constants possess sitnilar syntax, but 
can have at most two significant 
hexadecimal numerals, with a range of 0 to 
FF. 
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Octal Integer Constants 

Write an octal integer word constant as a 
series of up to six significant octal 
numerals (0 through 7) followed by the 
letter 'Q' . Its range of values is 0 to 
177777. Byte constants can have at most 
three significant octal numerals, with a 
range of 0 to 377. 

17Q 

A57Q '. " 

177776Q - ■ 



Default Integer Constants 

If you don't follow an integer constant 
with 'T*, 'H', or 'Q' , the integer 

will, by default, be of a certain type. 
This type is processor dependent. (See 
Chapter 2.) 



Character Constants 

Character constants are special cases of 
character strings; you may use than in 
expressions. The maximum length is two 
characters for a word constant and one 
character for a byte constant. Character 
constants are delimited by double quotes. 

"ft" ■ ■ 

"Be" ■ . 

. "YA" . ■ 
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Assembly Time Constants 

Write an assembly time constant as an 
identifier that the .EQU directive has 
assigned a constant value. (Refer to the 
section on "Data and Constant 
Definitions," presented later in this 
chapter. ) Its value is completely 
determined at assembly time from the 
expression following the directive. You 
must define assembly time constants before 
you refer to them. 



Expressions 

Use expressions as symbolic operands for 
machine instructions and assembler 
directives. An expression can be: 

• A label, which might refer to a defined 
address or an address further down in the 
source code (implying that the label is 
presently undefined), an externally 
referenced address, or an absolute 
address . 

• A constant. 

• A series of labels or constants separated 
by arithmetic or logical operators. 

• The null expression, which evaluates to a 
constant of value 0. 
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Relocatable and Absolute 

An expression containing wore than one 
label is valid, only if the number of 
relocatable labels added to the expression 
exceeds the number of relocatable labels 
subtracted from the expression by zero or 
one. The expression result is absolute if 
the difference is zero, and relocatable if 
the difference is one. Don't use 
subexpressions that evaluate to 
relocatable quantities as arguments to a 
multiplication, division, or logical 
operation. Also, don't apply unary 

operators to relocatable quantities. 

In relocatable programs, don't use 
absolute expressions as operands of 
instructions that require 

location-counter-relative address modes. 



Linking and Restrictions 

An expression may contain no more than one 
externally defined label, and its value 
must be added to the expression. An 
expression containing an external 
reference may not contain a 
forward-referenced label, and the 
relocation sum of any other relocatable 
labels in the expression must be equal to 
zero. 



1-12 



The Assembler 



An expression may contain no more than one 
forward-referenced identifier. A 
forward-referenced identifier is assumed 
to be a relocatable label defined further 
down in the source code; you must define 
any other identifiers before using them in 
an expression. Also, don't place an 
externally defined label in an expression 
containing a forward-referenced label. 



Arithmetic & Logical Operators 

You may use the following operators in 
expressions: 

• Unary operations: 
' + ' plus 

'-'minus (two's corrplement negation) 
'"'logical not (one's complement negatioi 
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• Binary operations: 
' + ' plus 

minus 
' " ' exclusive or 
' * ' multiplication 
'/'signed integer division (DIV) 
'//'unsigned integer division (DIV) 
'%• unsigned remainder division (MOD) 
' I ' bitwise OR 

bitwise AND 

fli Use the following operators only with 
conditional assembly directives: 

' = ' equal 

'O'not equal 

0 Use the following symbols as 
alternatives to the single-character 
definitions presented above. 
Occurrences of these alternative 
definitions require at least single 
blank characters as delimiters: 

.OR 

• AND = 

.NOT = 

.XOR = 

.MOD = 
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The assembler evaluates expressions from 
left-to-right; there is no operator 
precedence. All operations are performed 
on word quantities. Limit unary operators 
to constants and absolute addresses; and 
enclose subexpressions that contain 
embedded unary operators with angle 
brackets . 



Subexpression Grouping 

You may use angle brackets ( ' < ' and ' > ' ) 
in expressions to override the 
left-to-right evaluation of operands. 
Subexpressions enclosed in angle brackets 
are conpletely evaluated before including 
them in the rest of the expression. Angle 
brackets are used instead of parentheses 
to group expressions. Using parentheses 
to group expressions doesn't generate an 
error but causes the assembler to 
interpret the expression as indirect 
addressing mode. 
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Examples 



In the following examples of valid 
expressions, the default radix is decimal: 



nAm(-t-4 

rirUA (N'T 


r 


The suffl cf the vatu© of 






ident'i'fier MARK plus 4 


BILL-2 


f 


Tl-ig result of subtracting 2 froffi 






the value of identifier BILL. 


2-BARRY 


} 


The result of subtracting the ;•• 




r 


value of identifier BARRY from 2. - 






BARRY must be. absolute. 


3*2+MACRO 




The sum of the value of 






identifier MACRO plus the . 






product of 3 times 2. 


DAVI0+3*2 




2 times the sum of the ._ ■ 






identifier E)AVI[) and 3. . 




'f 


David must be absolute. 


6 50/2-RICH 




The result of. dividing 650 by 2 






and subtracting the value of 






identifier RICH from the 






quotient. RICK must be absolute 






Null expression: constant 0 


-4*12+<6/2> 


t 


evaluates to -45 (decimal) 


85+2+<-5> 




evaluates to 82 Cdecimal) 


0I1&<"0> 




evaluates to 1 


0 .OR 1 .AND 


<.NOT 0> ; is the same expression 






; (result is 1> 
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Source Statement Format 

An assembly language source program consists 
of source statements that may contain machine 
instructions, assembler directives, comments, 
or nothing (a blank line). Each source 
statement is defined as one line of a text 
file. 



Label Field 

The assembler supports the use of both 
standard labels and local (that is, 
reusable) labels. Begin the label field in 
the left-most character position of each 
source line. Macro identifiers and machine 
instructions must not appear in the start of 
the label field, but assembler directives 
and comments may appear there. 



Standard Label Usage 

A standard label is an identifier placed 
in the label field of a source statement. 
You may teimlnate it with an optional 
colon character , which isn ' t used when 
referencing the label. Only the first 
eight characters of the label are 
significant; the assembler ignores the 
rest . The underscore character isn ' t 
significant. 



■ BIOS 




. L3456: 


; referenced as 'L3456' 


The Kind 




LONG Label 


; last character is ignored 
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A standard label is a symbolic name for a 
unique address or constant; declare it 
only once in a source program. A label is 
optional for machine instructions and for 
many of the assembler directives. A 
source statement consisting of only a 
label is a valid statement; it effectively 
assigns the current value of the location 
counter to the label. This is equivalent 
to placing the label in the label field of 
the next source statement that generates 
object code. Labels defined in the label 
field of the .EQU directive are assigned 
the value of the expression in the operand 
field. (See the "Data and Constant 

Definitions" section, presented later in 
this chapter.) 



Local Label Osage 

Local labels allow source statements to be 
labeled for other instructions to 
reference, without taking up storage space 
in the symbol table. They can contribute 
to the cleanliness of source program 
design by allowing nonmnemonic labels to 
be created for iterative and decision 
constructs to use, thus reserving the use 
of mnemonic label names for demarking 
conceptually more important sections of 
code. 
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In local labels, you must place in the 
first character position; the remaining 
characters must be digits. As in regular 
labels, only the first eight digits are 
significant. The scope of a local label 
is limited to the lines of source 
statements between the declaration of 
consecutive standard labels ; thus , the 
jump to label $4 in the following example 
is illegal: 



LABELI 


ADC 


AX, SI 




. $3. 


MOV 


MEM, AX 






JC 


$3 


; legal 




NOP 








JNC 


$4 


; i I legal 


LABEL2 


ADC 


AX, SI 






MOV 


MEM, AX 





You may define up to 21 local labels 
between 2 occurrences of a standard label. 
On encountering a standard label, the 
assembler purges all existing local label 
definitions; hence, all local label names 
may be redefined after that point. Don't 
use local labels in the label field of the 
.EQU directive, (See the "Data and 
Constant Definition" section in this 
chapter. ) 
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Opcode Field 

Begin the opcode field with the first 
nonblank character following the label 
field; or with the first nonblank character 
following the left-^iiost character position 
when the label is omitted. Terminate it 
with one or more blanks. The opcode field 
can contain identifiers of the following 
types : 

• Machine instruction. 

• Assembler directive. 

• Macro call. 



Operand Field 

Begin the operand field with the first 
nonblank character following the opcode 
field; terminate it with zero or more 
blanks. It can contain zero or more 

expressions, depending on the requirements 
of the preceding opcode. 



Comment Field 

You can precede the conment field with zero 
or more blanks, begin it with a semicolon 
(';'), and extend it to the end of the 
current source line- The conment field may 
contain any printable ASCII characters. It 
is listed on assembled listings and has no 
other effect on the assembly process. 
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Source File Format 

You should use the system editor to produce 
assembly source files and save them as text 
files. You can construct a source file from 
the following entities: 



• Assembly routines 
functions) . 

• Global declarations. 
Assembly Routines 



(procedures and 



A source file may contain more than one 
assembly routine. In this case, a routine 
ends when a routine delimiting directive 
occurs (for example, the start of the 
following routine) . Each routine in a 
source file is a separate entity. It 
contains its own relocation information; 
and, during linking, a host program may 
refer to it individually. 

Begin assembly routines with a .PROC, .FUNC, 
.REIiPROC, or .RELFUNC directive. Terminate 
the last routine in the source file with the 
.END directive. 

At the end of each routine, the assembler's 
symbol table is cleared of all but 
predefined and globally declared symbols, 
and the location counter (LC) is reset to 
zero. 
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Global Declarations 

An assembly routine may not directly access 
objects declared in another assembly 
routine, even if the routines are assembled 
in the same source file; however, sometimes 
it's desirable for a set of routines to 
share a coramrxDn group of declarations. 
Therefore, the assembler allows global data 
declarations. 

All subsequent assembly routines may 
reference any objects declared before a 
.PROC, .FUNC, -RELPROC, or .RELFUNC 
directive initially occurs in a source file. 
No code may be generated before the first 
procedure delimiting directive; hence, the 
"global" objects are limited to the 
noncode-generating directives (.EQU, .REF, 
,DEF, .MACRO, .LIST, etc.). 



Absolute Sections 

You'll often have to access absolute 
addresses in memory, regardless of where an 
assembly routine is loaded in memory. For 
instance, a program may need to access ROM 
routines. Absolute sections allow you to 
define labels and data space using the 
standard syntax and directives; this give 
you the added capability of specifying 
absolute (nonrelocatable) label addresses, 
starting at any location in memory. 
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You should initiate absolute sections with 
the directive .ASECT (for absolute section) 
and terminate them with the directive .PSECT 
(for program section, which is the default 
setting during assembly). When the .ASECT 
directive is encountered, the absolute 
section location counter (ALC) becomes the 
current location counter. Use the .ORG 
directive to set the ALC to any desired 
value. Label definitions are nonrelocatable 
and are assigned the current value of the 
ALC- The data directives .WORD, .BLOCK, and 
• BYTE cause the ALC— instead of the regular 
LC— to be increriented. 

Data directives in an absolute section can't 
place initial values in the locations 
specified as they can when used in the 
program section. Thus, the absolute section 
serves as a tool for constructing a template 
of label-memory address assignments. 

You may use the equate directive (.EQU) in 
an absolute section, but restrict the labels 
to being equated only to absolute 
expressions. The only other directives 
allowed to occiir within an absolute section 
are .LIST, .NOLIST, .END, and the 
conditional assembly directives. 

Absolute sections may appear as global 
objects. 
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The following is a sirrple example of an 
absolute section: 





,ASECT 


/ 


Start absolute section 




.ORG ODFOOH 




set ALC to DFOO hex 






/ 


note - no data values assigned 








label assignments below 


DSKOUT 


.BYTE 




DSKOUT = DFOO 


DSKSTAT 


-BYTE 




DSKSTAT = DF01 


CONS 


.WORD 


r 


CONS = 0F02 


BLAGUE 


.BLOCK A 




BLA6UE=DF0A (4 bytes) 


REHOUT 


.WORD 




REMOUT = DF08 


OFFSET 


.EQU REnOUT+2 




OFFSET = DFOA 




.PSECT 
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ASSHiBLER DIRECTIVES 



Assembler directives (sometimes referred to as 
pseudo-ops) enable you to supply data to be 
included in the program and control the assembly 
process. Place assembler directives in the 
source code as predefined identifiers preceded 
by a period (.)• 



The following metasymbols are used in the syntax 
definitions for assembler directives: 



• Special characters and items in capital 
letters must be entered as shown. 

• Items within angle brackets (<>) are defined 
by you. 

• Items within square brackets ([]) are 
optional . 

• The word 'or' indicates a choice between two 
items. 
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Items in lowercase letters are generic names 
for classes of items. 



The following terms are names for classes of 
items: 

b The occurrence of one or more 

blanks. 



comment 



expression 



Any legal comment. (Refer to 
the "Comment Field" paragraph 
presented earlier in this 
chapter. ) 

Any legal expression. (Refer 
to a prior paragraph entitled 
"Expressions.") 



integer 



Any legal integer constant as 
defined earlier in the section 
called "Constants." 



label Any legal label. (Refer to the 

"Label Field" paragraph earlier 
in this chapter.) 

value Any label, constant, or 

expression. Its default value 
is 0. 



value list A list of zero or more values 

delimited by connmas. 

identifier A legal identifier as defined 

in a preceding paragraph 
entitled "Identifiers.") 
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idlist A list of one or more 

identifiers delimited by 
comnas. 



id: integer list A list of one or more 
identifier-integer pairs 
separated by a colon and 
delimited by a conma. The 
colon .'integer part is optional; 
its default value is 1. 



character string Any legal character string. 

(See the paragraph "Character 
Strings , " above . ) 



file identifier Any legal name for a Pascal 
text file. 

Example : 

. . t:<labeL>D [;b3 .ASCII b <character string> C<commeht>D 



This indicates that you may optionally include 
the label field, and that you must include a 
character string as an operand. 



Small examples are included after each 
definition to supply you with a reference to the 
specific syntax of the directive - 
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Procedure-Delimiting Directives 

Include at least one set of 
procedure-delimiting directives in every 
source program (including those intended for 
use as stand-alone code files). The assembler 
is used most frequently for assembling small 
routines intended to be linked with a host 
compilation unit. Use the directives .PROC 
and .FUNC to identify and delimit assembly 
language procedures; and .REIPROC and .REl.FUNC 
to identify and delimit dynamically 
relocatable procedures. Dynamically 
relocatable procedures may reside in the code 
pool; they are subject to more of the system's 
memory management strategies. (For more 
detailed information about using these 
directives, refer to the section, "Program 
Linking and Relocation," presented later on in 
this chapter . ) 
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.PROC 



Form: 



Example : 



Identifies the beginning of an 
assembly language procedure . 
The procedure is terminated 
when another delimiting 
directive occurs in the source 
file. 



CbD .PROC b <identif ier> C^<i nteger>:J :<comment>3 



<identifier> is the name 
associated with the assembly 
procedure. 



<integer> indicates the number 

of parameter words passed to 

this routine. The default is 
0. 



.PROC I>LDRIVE,2 
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.FDNC Identifies the beginning of an 

assembly language function. 
The host compilation unit 
expects a function to return a 
result on the top of the stack; 
otherwise, .FUNC is equivalent 
to the .PROC directive. 

Form: ■-'-~^'/: " " ". - 

Zb3 .FUNC b <identif ier>C,<integer>:] C<coriment>D 



<identifier> is the name 
associated with the assembly 
procedure. 

<integer> indicates the number 
of parameter words passed to 
this routine- The default is 
0. 

Example: .fUNc random 



1-30 



The Assembler 



• RELPROC Identifies the beginning of a 

dynamically relocatable 
assembly language procedure. 
Such assembly procedures must 
be position-independent. (See 
the "Program Linking and 
Relocation" section in this 
chapter.) The procedure is 
terminated when another 
delimiting directive occurs in 
the source file. 

Form: 

Cbl .RELPROC b <identifTer> r,<1nteger>D !!< comment >j 



<identifier> is the name 
associated with the assembly 
procedure. 



< integer > indicates the number 
of parameter words passed to 
this routine. The default is 
0. 

Example: .relproc pqo?,z 



1-31 



The Assembler 



.RELFUNC Identifies the beginning of a 

dynamically relocatable 
assembly language f unction - 
The host compilation unit 
expects this function to return 
a function result on top of the 
stack; otherwise, .RELFUNC is 
equivalent to the .RELPROC 
directive. 

Form! ^^"^ .RELFUNC b <identif ier>C,<integer>3 t;<comment>3 



<identifier> is the name 
associated with the assembly 
function. 

<integer> indicates the number 
of parameter words passed to 
this routine. The default is 
0. 

Example: .relfunc pooof 



.END Marks the end of an assembly 

source file. 

Form: . C<(.abeL>3 ,END : V \ 
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Data and Constant Definitions 

.ASCII Converts character strings to a 

series of ASCII byte constants 
in memory. The bytes are 
allocated sequentially as they 
appear in the string. An 
identifier in the label field 
is assigned the location of the 
first character allocated in 
memory . 

Form; C<LabeL>3 Cb] .ASCII b <character string> C<comment>3 



<character string> is any 
string of printable ASCII 
characters delimited by double 
quotes . 

Example: ..ascii "hello- ; 
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.BYTE 



Allocates and initializes 
values in one or more bytes of 
memory. Values must be 

absolute byte quantities. The 
default value is zero. An 
identifier in the label field 
is assigned the location of the 
first byte allocated in memory. 



Form: 



E<LabeL>} Cbl. .BYTE b CvatueList3. C<cominent>3 



Example: 



TE«P .BYTE A; 


code 


wouLd 


be 


04 


hex " ' 


TEMPI .8YTE ; 


code 


would 


be 


00 


hex - 



1-34 



The Assembler 



.BLOCK Allocates and initializes a 

block of consecutive bytes in 
memory. A byte value must be 
an absolute quantity. The 
default value is zero. An 
identifier in the label field 
is assigned the location of the 
first byte/word allocated. 

Form: n<Label>] Cb: .block b <Length>[:,<value>]. t:<conWient>a 



<length> is the the number of 
bytes to allocate with the 
initial value <value>. 

Example: temp .block 4,6h 



The output code would be: 

06 06 06 06 ;four bytes with value 06 hex 
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.WORD 



Allocates and initializes 
values in one or more 
consecutive words of memory. 
Values may be relocatable 
quantities. The default value 
is zero. An identifier in the 
label field is assigned the 
location of the first word 
allocated. 



Form: 



C<UbeL>] Lhl .WORD b <vaLuelist> C<comment>3 



Example: 



TEMP .WORD 0,2, ,4 



On a processor which has the 
least-significant byte first in 
a word, the output code would 
be: 




Example 



LI .WORD L2 



The output code would be a word 
containing the address of the 
label 1.2. 
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.EQD Associates a label with a 

particular value. Labels may 
be equated to an expression 
containing relocatable labels, 
externally referenced labels , 
and /or absolute constants. The 
general rule is that labels 
equated to values must be 
defined before use. The 
exception to this rule is for 
labels equated to expressions 
containing another label. 
Jjocal labels may not appear in 
the label field of an equate 
statement. 

Form*. <Label> Zbl .EQU b <vaLue> C<comment>l 



ExajTiple: base .equ 



R6 
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Location Counter Modification 

These directives affect the value of the 
location counter (1/2 or AlC) and the location 
in memory of the code being generated. 

-ORG If used at the beginning of an 

absolute assembly program, .ORG 
initializes the location 
counter to <value>. Using .ORG 
anywhere else generates zero 
bytes until the value of the 
location counter equals 
<value>. 



Form: 



Example : 



Cb] .ORG 


b <vaLue> C< comment >3 




.ORG 


1000H 
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.ALIGN Outputs sufficient zero bytes 

to set the location counter to 
a value that is a multiple of 
the operand value. 

Form; Cb] .ALIGN b <»/aLue> C< comment >: 



Example: , .align 2 



This aligns the L€ to a word 
boundary . 



Listing Control Directives 



Use these directives to control the format of 
the assembled listing file generated by the 
assembler. These directives don't generate 
code, and their source lines don^t appear on 
assembled listings. (For a more detailed 
description of an assembled listing, refer to 
the "Assembler Output" paragraph, presented 
later in this chapter. ) 
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.TITLE 



Form: 

Example: 

.ASCIILIST 

Form: 
ExajTple : 



Changes the title printed on 
the top of each page of the 
assembled listing. The title 
may be up to 80-characters 
long. The assembler changes 
the title to ' SYMBOLTABLE 
DUMP' when printing a symbol 
table; the title reverts back 
to its former value after the 
symbol table is printed. The 
default value for the title 
is ' 

Zbl .TITLE b <character str-Tng> t<corament>] • 



.TITLE "MACROS" 



Prints all bytes the .ASCII 
directive generates in the 
code field of the list file, 
creating multiple lines in 
the list file if necessary. 
Assembly begins with an 
implicit .ASCI ILIST 
directive. 

Lhl .ASGIILIST C<Gomineot>l 



.ASCIILIST 
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.NOASCIILIST 



Limits the printing of data 
the .ASCII directive 
generates to as many bytes as 
will fit in the code field of 
one line in the list file. 



Form: 



Ihl .NOASCIILIST C<comment>: 



Example : 




CONDLIST 



lists source code contained 
in the unassembled sections 
of conditional assembly 
directives. 



Form: 



tbD .CONDLIST C<comment>a 



Example : 



.CONDLIST 
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.NOCONDLIST Suppresses the listing of 
source code contained in the 
unassembled sections of 
conditional assembly 
directives. Assembly begins 
with an implicit .NOCONDLIST 
directive. 

Form: Cb^ .NOCONDLIST C<comment>T ■ ■ 



Example: .nocondlist 



.NOSYMTABLE Suppresses the printing of a 
symbol table after each 
assembly routine in an 
assembled listing. 

Form: Cbl .nosywtable n<comm«nt>] 



Example: .nosyhtable 
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-PAGEHEIGHT Controls the number of lines 
printed in an assembled 
listing between page breaks. 
Assembly begins with an 
implicit .PAGEHEIGHT 59 
directive. 

Form: CbD .PAtSEHElGHI <integer> [;<connnieflt>3 - ; 



Example : .pageheight 4o. 



.NARROWPAGE Limits the width of an 
assembled listing to 80 
columns. The symbol table is 
printed in a narrow format, 
source lines are truncated to 
a maximum of 49 characters, 
and title lines on the page 
headers are truncated to a 
maximum of 40 characters. 

Form : . CW .NARROWPAGE :<comment>3 ^ j / 



Exampl e : ."narrowpage 
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PAGE 



Continues the assembled 
listing on the next page by 
sending an ASCII form feed 
character to the assembled 
listing. 



Form: 



Zh3 .PAGE 



Example 



.PAGE 



LIST 



Enables output to the list 
file, if a listing isn't 
already being generated. You 
can use .LIST and .NOLIST to 
exaMne certain sections of 
source and object code 
without creating an assembled 
listing of the entire 
program. Assembly begins 
with an implicit .LIST 
directive. 



Form: 



Cb] .LIST 



Example 



.LIST 
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NOLIST 



Suppresses output to the list 
file, if it isn't already 
off. 



Form: 



Lhl .NOLIST 



Example: 



.NOLIST 



.MACROLIST Specifies that all subsequent 

macro definitions have their 
macro bodies printed when 
they are called in the source 
prograjn. Assembly begins 
with an implicit .MACROLIST 
directive. The section 

called "Macro I^anguage," 
presented later in this 
chapter, gives a detailed 
description of macro 
language. 



Form: 



Cb] .MACROLIST 



Example : 


.MACROLIST 
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.NOMACROLIST 

Form: 
Example : 
.PATCHLIST 



Form: 
Example: 



Specifies that all subsequent 
macro definitions won't have 
their macro bodies printed 
when they are called in the 
source program. Only the 
macro identified and 
parameter list are included 
in the listing. 

Cb] .NOMACROLIST 



.NdMACHOLIST 



Lists occurrences of all back 
patches of forward-referenced 
labels in the list file. 
Assembly begins with an 
implicit . PATCHLI ST 

directive. For a detailed 
description of back patches , 
ref er to the paragraph , 
"Forward References," in the 
section called, "Assembler 
Output," presented later in 
this chapter. 

Zbl .PATCHLIST 



.PATCHLIST 
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.NOPATCHI.IST Suppresses the listing of 
back patches of forward 
references . 

Form: cbD .nopatchlist 



Example : . .nopatchlist 



Program Linkage Directives 



Linking directives enable communication 
between separately assembled and/or conpiled 
programs. Later in this chapter, the section 
called "Program Linking and Relocation" has a 
detailed description of program linking. 



CONST 



Allows the assembly procedure to 
access globally declared 
constants in the host 
compilation unit. 



Form: 



rb] .CONST b <idList> i:<conMnent>3 



Fach <ID> is the name of a 
global constant declared in the 
host. 

Example : .const length 
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•PUBLIC Allows an assembly language 

routine to reference variables 
declared in the global data 
segment of the host compilation 
unit. 

Form: Cb3 .public b <idList> C<comment>: .. ■■. 



Each <ID> is the name of a 
global variable declared in the 
host. 

Example: .public i^j, length 
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.PRIVATE Allows an assembly language 
routine to store variables, 
which only the assembly language 
routine can access, in the 
global data segment of the host 
compilation unit. 

Form: Cbl .PRIVATE b <id; irvteger List> C<corament>] 



Each <ID> is treated as a label 
defined in the source code. 
<integer> determines the number 
of words of space allocated for 
<ID>. 

Example: .private PRrNT,BARRAY:9 ^ 
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.INTERP Allows an assembly language 

procedure to access code or data 
in the p-code FME, .INTERP is a 
predefined symbol for a 
processor-dependent location in 
the resident P^4E code; you may 
use offsets from this base 
location to access any code in 
the FME. To use this feature 
correctly, you must know the 
PME's jump vector for this 
location. .INTERP is generally 
restricted to systems 
applications. 

Formi valid when used in <expression> 



Example: ERR .EQU 12 -hypothetical 

; routine offset 

BOMB .EQU .INTERP+ERR 
JMP BOMB 
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.REF 

Form: 
Example : 
.DEF 

Form: 
Example : 



Provides access to one or more 
labels defined in other assembly 
language routines. 

CbD .REF <idList>-C<comment>3 



,REF SCHLUMP 



Makes one or more labels, to be 
defined in the current routine, 
available for other assembly 
language routines to reference. 

CbD .DEF <idlist> C<commer(t>D 



: .DEF FOON,YEEN 
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Conditional Assembly Directives 

A detailed description of conditional assembly 
features is presented later in this chapter in 
a section called, "Conditional Assembly." 



.IF Marks the start of a conditional 

section of source statements. 

Form; '. Cb^ .if b <expression> C = of <> <expressior>>l C<coinme.nt>l 



Example: .if debug 

• ENDC Marks the end of a conditional 

section of source statements. 

Form: Zhl .EN&C C<comment>3 



Example: .enoc 
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.ELSE 



Marks the start of an 
alternative section of source 
statements. 



Form 



IbJ .ELSE C<comment>: 



Example : 



.ELSE 



Macro Definition Directives 



A detailed description of macro language is 
presented later in this chapter in the 
section, "Macro Language." 

-MACRO Indicates the start of a macro 

definition. 

Form: CbJ ..macro b <ident if ier> C<comment>l 



<identifier> calls the macro 
being defined. 



Example : .mem aoowords 
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.ENDM Marks the end of a macro 

definition. 

Form: .ENDM C<comm«nt>] 

Example: " .endm 
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Miscellaneous Directives 

.INCLUDE Causes the assembler to start 
assembling the file najned as an 
argument of the directive; when 
the end of this file is reached, 
assembling resumes with the 
source code that follows the 
directive in the original file. 
This feature is useful for 
including a file of macro 
definitions or for splitting up 
a source program too large to be 
edited as a single text file. 
You can't use .INQiJDE in: (1) 
an included source file (that 
is, nested use of the 
directive); and (2) in a macro 
definition. 

Form! Ihl .INCLUDE b <fiLe identifier> C<comment>l 



At least one blank character 
must separate the conment field 
of the .INQ^UDE directive from 
the file identifier. 

Example: .include mydisk:macros 
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ABSOLUTE Causes the following assembly 
routine to be assembled without 
relocation information. Labels 
become absolute addresses and 
label arithmetic is allowed in 
expressions. .ABSOLUTE is valid 
only before the first procedure 
delimiting directive occurs. 
Don't use .ABSOLUTE when the 
assembled routine is to be 
called from a high-level host. 
(Refer to the "Program Linking 
and Relocation" section, 
presented later in this chapter, 
for a detailed description of 
abolute code files.) 



Form: 



CbJ .ABSOLUTE C<comment>3 



Example : 



.ABSOLUTE 
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.ASECT 

Form: 
Example : 
.PSECT 

Form: 
Example: 



Specifies the start of an 
absolute section. For a 

detailed description of 
".ASECT," refer to the paragraph 
called "Absolute Sections," 
presented earlier in this 
chapter. 

tbl .ASECT r<cominent>] 



.ASECT 



Specifies the start of a program 
section and terminates an 
absolute section. (Refer to the 
"Absolute Sections" paragraphs, 
presented earlier.) 

CbD .PSECT C<comment>] 



.PSECT 
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.RADIX Sets the current default radix 

to the value of the operand. 
Allowable operands are: 2 
(binary), 8 (octal), 10 
(decimal), and 16 (hexadecimal). 
The default radix of an integer 
constant is processor-specific. 
(See Chapter 2.) 

Form: IhJ .radix <integer> C<comm€nt>] 



Example: 



.RADIX 10 


; dec iniaL . . - . ■ ''~ :.• . • • • 




; default radix . ■ - " ' • : ■■ 
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CONDITIONAL ASSEMBLY 

Use conditional assembly directives to 
selectively exclude or include sections of 
source code at assembly time. Initiate 
conditional sections with the ,IF directive and 
terminate them with the .ENDC directive. They 
may contain the .ELSE directive. Use 
conditional expressions to control inclusion of 
conditional sections. Conditional sections may 
contain other conditional sections. 

When the assembler encounters an .IF directive , 
it evaluates the associated expression to 
determine the condition value. If the condition 
value is false, the source statements following 
the directive are discarded until a matching 
.ENDC or .ELSE is reached. If you use the ,EI^E 
directive in a conditional section, source code 
before the .ELSE is assembled if the condition 
is true; and source code after the .ELSE is 
assembled if the condition is false. 

Overall syntax for a conditional section (using 
the meta language described earlier in the 
"Assemblers Directives" paragraph) is as 
follows: 

.If <conditional expression> 
<source stateinents> 

■ Q.ELSE 

<source 3tatements>l 
.■ .£NDC ^ 
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Conditional Expressions 

A conditional expression can take one of two 
forms: a single expression or comparison of 
two character strings or expressions. The 
first form is considered false if it evaluates 
to zero; otherwise, it's considered true. The 
second form of conditional expression compares 
for equality or inequality (indicated by the 
symbols *=' and '<>', respectively). 



Example : 



.IF LABEL1-LABEL2 




arithmetic expression 






This code is assembled only if 






difference is not zero 


' .IF %1="STUFF" 




comparison expression . 






This code is assembled only if 






outer condition is true and 






text of first macro parameter 






is equal to "STUFF". 


. .ENDC 




terminate nested section 






This code is assembled if outer 






condition is true 


-.ELSE 










This code is assembled if first 






condition is false 


':■ -.ENDC 




terminate outer section , . 
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MACRO LANGUAGE 

The assembler allcws you to use a macro language 
in source programs. This enables you to 
associate a set of source statements with an 
identifying symbol- When the assembler 

encounters this symbol (known as a macro 
identifier) in the source code, it substitutes 
the corresponding set of source statements 
(known as the macro body) for the macro 
identifier, and assembles the macro body as if 
it had been included directly in the source 
program. You can use carefully designed set of 
macro definitions in all source programs to 
simplify developing assembly language routines- 

In addition, you can enhance the macro language 
by including a tnechanism for passing parameters 
(known as macro parameters) to the macro body 
while it is being expanded. This allows a 
single macro definition to be used for an entire 
class of subtasks. 



Here is a simple example: 







; macro definition... 


.MACRO 


STRING 


; macro identifier is 






; STRING 






; Macro Body: 






; %1 and %2 are 






; parameter 






; declarations 


.BYTE 


%2 


; 2nd parameter is 






; Length byte ■ ; 


.ASCII 


xr 


; 1st parameter is 






; argument 


.ENDH 




; end macro definition 
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Further down in the source code 



STRIUG 


"WRITE", 5. 


; 1 st macro call 






; parameters are 






; '"WRITE"' 






; and '5. ' 


STRING 


"TYPE SPACE' 


',10. ; 2nd macro caLL 






; parameters are 






; '"TYPE SPACE"' 






r and '10,' : . . : : / ; : ; 



This is what gets assembled.,. 



.BYTE 5. ; data string dec Laration^s 

.ASCII "WRITE" 

.BYTE 10. 

.ASCII "TYPE SPACE" 



Macro Definitions 

You may place macro definitions anywhere in a 
source program and delimit them with the 
directives .MCRO and .ENDM. The macro 
identifier must be unique to the source 
program, except when you redefine a predefined 
machine instruction name as a macro 
identifier. You shouldn't include a macro 
definition within another macro definition. 
However, you may include macro calls. You may 
nest macro calls to a maximum depth of five 
levels. A macro definition must occur before 
any calls to that macro are assembled, but 
macro calls may be forward-referenced within 
the bodies of other macro definitions. 
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Macro Calls 

You can place macro calls anywhere in a source 
program that code may be generated. A macro 
call consists of a macro identifier followed 
by a list of parameters. Delimit the 

parameters with cormas and terminate them with 
a carriage return or semicolon. Upon 
encountering a macro call, source code is read 
from the text of the corresponding macro body. 
Macro parajneters within the macro body are 
substituted with the text of the matching 
parameter listed after the macro identifier 
that initiated the call. 



Parameter Passing 

You may reference macro parameters in a macro 
body by using the symbol '%n' in an 
expression, where 'n' is a single nonzero 
decimal digit. Upon scanning this symbol, the 
assembler replaces it with the text of the 
n'th macro parameter. Note that macro 

parameters are not expanded within the quotes 
of an ASCII data string. 

Three cases are possible: 

1. The parameter exists— the substitution is 
made. 

2. The n'th parameter doesn't exist in the 
parameter list being checked (less than n 
parameters were passed); a null string is 
substituted. 
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3. Another symbol of the form ' %m ' is 
encountered in the parameter list. If 
nested macro calls exist , the text of the 
m'th parameter at the next higher level of 
macro nesting is substituted; otherwise, 
the symbol itself is assembled. 

You must pass parameters without leading and 
trailing blanks. You may pass all assembly 
symbols, except macro calls, as parameters. 



The following is an example of parameter 
passing in macros: 



.WACRO 


DOS 


UNO 


%2,un: ■ . : : -■ ■ 


. . SAR 


x^ ' .■ . . • : • 


.. ■ .ENDW - 




• .MACRO 


UNO .■ ■ .. 'y- 


MOV 




SAL 


X2 


..ENDM 
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In a program, the macro call.., 

DOS TROIS,DEUX :. 



assembles as. . . 



MOV 


DEUX, UN 


; UNO got UN directLy, 
; but had to use OOS's 
; 2nd pa ram 




SAL 


UN 






SAR 


TROIS 


; DOS used its own 1st 
; pa rati) 





Scope of Labels in Macros 

A problem arises in using macro language when 
the definition of a macro body requires you to 
use branch instructions and, thus, have 
labels. Declaring a regular label in a macro 
body is incorrect if the macro is called more 
than once, because the label would be 
substituted twice into the source program and 
flagged by the assembler as a previously 
defined label. You can use 

location-counter-relative addressing, but this 
is prone to errors in nontrivial applications. 
The best solution is to generate labels that 
are local to the macro body; the assembler's 
local labels can do this. 



1-65 



The Assembler 



Local label names you declare in a macro body 
are local to that macro; thus, a section of 
code that contains a local label $1 and a 
macro call whose body also has the local label 
$1, assembles without errors, (Contrast this 
with what happens when two occurrences of $1 
fall between two regular labels.) This 
feature allows you to use local labels freely 
in macros without conflicting with the rest of 
the program. 

NOTE: Remember that a maximum of 21 local 
labels can be active at any instant. 



Local Labels as Macro Parameters 

Passing local labels as parameters has a 
special property. Unlike other macro 

parameters, local labels aren't passed as 
uninterpreted text. The scope of a local 
label passed in a macro call doesn't change 
as it is passed through increasing levels of 
macro nesting, regardless of naming 
conflicts along the way. One use of this 
property is passing an address to a macro 
that simulates a conditional branch 
instruction. 

The following is an example of passing local 
labels as macro parameters: 



.MACRO EIN 
JE $1 
JNE %1 

$1 

.ENDM 
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In a prograjn, the code... 



'■■ TWIE 




SUB 


ICHI,NI 


EIN 


$1 ; - . .■ 


RET 




$1 




JMP 


SAN ^ . , / ■.' • ■ 



assembles as . . . 



TWIE 




SUB 


ICHI,NI 


JE 


$1 ; this references macro 




; Local label 


JNE 


$1 ; this references 




; outside $1 ■■ - 


$1 


. ; macro Local Label . ' 


RET 




$1 


.; outs i.de $1 . ' - . . 


JMP 


SAN •.■ ; _ ./ ; ■ ^ : ■ ■'. 
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PROGRAM LINKING & REI/X:ATI0N 



The assenbler produces either absolute or 
relocatable object code that you may link, as 
required, to create executable programs from 
separately assembled or compiled modules. (The 
linker is described in Appendix A.) 



Program linking directives generate information 
the system linker requires to link modules. 
Some of the advantages of linking are: 

B You can divide long programs into separately 
assembled modules to avoid a long assembly, 
reduce the symbol table size, and encourage 
modular programming techniques. 

IP You can enable other linked modules to share 
modules. 



You can add utility modules to the systen 
library for a large niomber of programs to use 
as external procedures. 

Programs can call assembly language 
procedures directly. 



The assembler generates linker information in 
both relocatable and absolute code files. The 
system linker accesses this information during 
linking and removes it from the linked code 
file. 
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Relocatable code includes information that 
allows a loader prograin to place it anywhere in 
memory, while absolute (also called core image) 
code files must be loaded into a specific area 
of menory to execute properly. Assembly 
procedures running in the p-System environirient 
must always be relocatable; the system PME 
performs loading and relocation at a load 
address the state of the system determines. 

Absolute code won't run under the p-System 
environment (under which high-level programs 
must run). However, relocatable code can run 
under the p-System. Code segments containing 
statically relocatable code remain in main 
memory throughout the lifetime of their host 
program (or unit) and are position-locked for 
that duration. Thus, relocatable code may 
maintain and reference its own internal data 
space (or spaces). In addition, statically 
relocatable code saves some space because its 
relocation information doesn't have to remain 
present throughout the life of the program. 
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The directives .PROC and .FUNC designate 
statically relocatable routines; .RFLPROC and 
,RELFUNC designate dynamically relocatable 
routines. Code segments that contain 
dynamically relocatable code don't necessarily 
occupy the same location in memory throughout 
their host's lifetime, but are maintained in the 
code pool along with other dynamic segments 
(mostly p-code) ; they may be swapped in and out 
of main memory while the host program (or unit) 
is running. Thus, dynamically relocatable code 
shouldn't maintain internal data spaces if that 
data must last across calls to the assembled 
routine. Data that is meant to last across 
different calls to the assembly routine must be 
kept in your host data segments by using 
.PRIVATES and .PUBLICS. 

1. Data space is embedded in the code, but the 
code doesn't move: 



.PROC FOON 






.WORD SPACE 






.END - . . ■ . . .'. 






The code moves, but data 


space 


is allocated 


in the host compilation 


unit 's 


global data 


segment : 






.fiELPROC FOON , 






PPT\/iTF SPACE 






■'.END ■ ••. " s'.;.-' •, 'V;' ■ 



1-70 



The Assembler 



3, Caution: The code may move and since the 
data is embedded in the code, the data may be 
destroyed between calls to the routine: 

.RELPROC FOON 
.WORD SPACE 

.END 



Code pool management is described in the 
Internal Architecture Reference Manual. 



Program Linking Directives 



This section describes the overall use of 
linking directives. All linking of assembly 
procedures involves word quantities; it isn't 
possible to externally define and reference 
data bytes or assembly time constants. 
Arguments of these directives must match the 
corresponding name in the target module (a 
lowercase Pascal identifier will match an 
uppercase assembly name, and vice versa) and 
must not have been used before their 
appearance in the directive. The assembler 
treats all subsequent references to the 
arguments as special cases of labels. The 
linker and /or FME resolves these external 
references by adding the link-time and 
run-time offsets to the existing value of the 
word quantity in question. Thus, any initial 
offsets generated by including of external 
references and constants in expressions are 
preserved. 
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Host Comraiinication Directives 

Use the directives .CONST, .PUBLIC, and 
.PRIVATE to allow constants and data to be 
shared between an assembly procedure and its 
host compilation unit. For examples, see 
the "Prograjn Linkage Directives" paragraph 
in the "Assembler Directives" section, 
presented previously in this chapter. 

.CONST Allows an assembly procedure 

to access globally declared 
constants in the host 
compilation unit. The linker 
patches all references to 
arguments of .CONST with a 
word containing the value of 
the host's compile-time 
constant. 

.PUBLIC Allows an assembly procedure 

to access globally declared 
variables in the host 
compilation unit. Note: You 
can use this directive to set 
up pointers to the start of 
multi-word variables in host 
programs; it isn't limited to 
single word variables. 
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.PRIVATE Allows an assembly procedure 

to declare variables in the 
global data segment of the 
host compilation unit that 
the host can't access. The 
optional length attribute of 
the arguments allows 
multi-word data spaces to be 
allocated; the default data 
space is one word. 



External Reference Directives 

Use the directives .REF and .DEF to allow 
separately assembled modules to share data 
space and subroutines. (For examples, refer 
ahead, in this chapter, to the paragraph, 
"Example of Linking to Pascal.") 

.DEF Declares a label to be defined in 
the current program as accessible to 
other modules. One restriction is 
imposed on its use— you can't .DEF a 
label that has been equated to a 
constant expression or used in an 
expression containing an external 
reference. 

.REF Declares a label existing and 
.DEF'ed in another module to be 
accessible to the current program. 
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Program Identifier Directives 

Use the directives .PROC, .FUNC, .RELPROC, 
.RELFUNC, and .END as deliiniters for source 
programs. You must include at least one 
pair of delimiting directives in every 
source program (relocatable or absolute). 

The identifier argument of the .PROC or 
.RELPROC directive serves two functions: 
the linker can reference it when linking an 
assembly procedure to its corresponding 
host, and other modules can reference it as 
an externally declared label. Specifically, 
the declaration: 

.PROC FOON ; procedure heading ; 



in a source program— is functionally 
equivalent in the assembly environment to 
the following stateiients: 



.DEF FOON 


; FOON may be externally 




; referenced 


FOON 


; declare FOON as a label 



This feature allows an assembly module to 
call other (external and eventually linked 
in) assembly modules by name. Use the ,FUNC 
and .RELFUNC directives when linking an 
assembly function directly to a host 
program; they aren't intended for uses that 
involve linking with other assanbly modules. 
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The linker references the optional integer 
argument after the procedure identifier. It 
does this to determine if the number of 
parameter words passed by the host's 
external procedure declaration matches the 
number specified by the assembly procedure 
declaration. It isn't relevant when linking 
with other assembly modules. 



Linking Program Ikxiules 

For information on linking with the p-System's 
other high-level languages, refer to the 
documentation on that particular language. 



Linking with a Pascal Program 

External procedures and functions are 
assembly language routines declared in 
Pascal programs. To run Pascal programs 
with external declarations, you must corrpile 
the Pascal program, assemble the external 
procedure or function, and link the two code 
files. 
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A host program declares a procedure to be 
external in a syntactically similar manner 
to a forward declaration. The procedure 
heading is given (with parameter list, if 
any), followed by the keyword 'EXTERNAL'. 
Calls to the external procedure use standard 
Pascal syntax. The compiler checks that 
calls to the external procedure agree in 
type and number of paranieters with the 
external declaration. All paraineters are 
pushed on the stack in the order of their 
appearance in the parameter list of the 
declaration; thus, the right-most parameter 
in the declaration will be on the top of the 
stack. (For a detailed description of 
parameter passing conventions, refer to the 
next section, called "Parameter Passing 
Conventions. ") 

You must make sure that the assembly 
language routine maintains the integrity of 
the stack. This includes removing all 
parameters passed from the host, preserving 
the SS and SP registers, and making a clean 
return to the Pascal rim- time environment 
using the return address originally passed 
to it. If you don't do this, a potentially 
fatal system crash can occur, as assembly 
routines are outside the scope of the Pascal 
environment's run-time error facilities. 
(For a detailed description of 
Pascal /assembly language protocols, refer 
ahead, in this chapter, to the section, 
"Sharing FME Resources.") 
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An external function is similar to a 
procedure, but has some differences that 
affect the way that paraineters are passed to 
and from the Pascal run-time environrrjent • 
First, the external function call pushes 
one, two, or four words on the stack before 
any parameters have been pushed. Two or 
four words are pushed for a function of type 
real, depending upon the real size that you 
are using. One word is pushed for all other 
types of functions. The words are part of 
the p-machine's function calling mechanism 
and are irrelevant to assembly language 
functions; the assembly routine must throw 
these away before returning the function's 
result. Second, the assembly routine must 
push the proper number of words (2 or 4 for 
type real; 1, otherwise) containing the 
function result onto the stack before 
passing control back to the host. A 
subsequent section, "Sharing FIVfE Resources," 
describes a clean way to do all of this 
without ever using an actual POP or PUSH 
operation. 
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Parameter Passing Conventions 

The ability of external procedures to pass 
any variables as parairieters gives you 
complete freedom to access the 
machine-dependent representations of 
machine-independent host data structures. 
However, with this freedom comes the 
responsibility of respecting the integrity 
of the p-machine run-time environment. To 
give you a better understanding of the 
host /assembly language interface, this 
section enumerates the pHtnachine's 
parameter passing conventions for all data 
types; it doesn't actually describe data 
representations. For examples of 
parameter passing between Pascal and 
external procedures, see Appendix C. 

You may pass parameters by either value or 
by reference (variable parameters). To 
manipulate assembly language, variable 
parameters are handled in a more 
straightforward fashion than value 
parameters. 

The word "tos" is used in the following 
sections as an abbreviation for "top of 
stack. " 
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Variable Parameters 

You should reference variable parameters 
through a one-word pointer passed to the 
procedure* Thus, the procedure 

declaration: 

' procedure pass_by_name (van i^j . : integer; 

var q : some_type); external; 

would pass three one-word pointers on the 
stack; tos would be a pointer to q, 
followed by pointers to j and i. 

A Pascal external procedure declaration is 
allowed to contain variable parameters 
lacking the usual type declaration; this 
enables you to pass variables of different 
Pascal types through a single parameter to 
an assembly Routine. Untyped parameters 
aren't allowed in normal Pascal procedure 
declarations. 

The procedure declaration: 

procedure untyped_var (var i; var q: 

some_type>; external; ^ 

contains the untyped parameter ' i ' . 
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Value Parameters 

Value parameters are handled according to 
their data type. Pass the following types 
by pushing copies of their current values 
directly on the stack: boolean, char, 
integer, real, subrange, scalar, pointer, 
set, and long integer. Other sections of 
this manual describe the number of words 
per data type and the internal data 
format. For instance, the declaration: 



procedure pass_by_value <1 ; 


: integer; r : 


; real); 




externa L; 





would pass two words or four words on 
"tos" containing the value of the real 
variable 'r' followed by one-word 
containing the value of the integer 
variable ' i ' . 

Pass variables of type record and array by 
value in the same manner as variable 
parameters ; pointers to the actual 
variable are pushed onto the stack. Pass 
variables of type PACKED ARRAY OF CHAR and 
STRING by value with a segment pointer 
(described in next section). 

Value parameters which are passed using 
pointers should be copied into a local 
data space for processing. The original 
copy of a value parameter should never be 
altered. 
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String and Byte Array Parameters 

When a string or byte array is passed as a 
value parameter to an assembly language 
routine, a "segment pointer" is passed on 
the stack. A segment pointer consists of 
two words. The first word (tos) contains 
either NIL or a pointer to a segment 
environment record. (This is determined 
by whether the parajr^eter is a constant or 
variable. ) 

If the first word is NIL, then the second 
word (at tos-1) points to the parameter. 

If the first word isn't NIL, then to find 
the parameter it is necessary to chain 
through some records. The first word 
(tos) is a pointer and the second word 
(tos-1) is an offset. The first word 
points to a segment environment record 
(EREC). The third word of that record 
contains a pointer to a SIB (Segment 
Information Block). If the first word of 
the SIB is NIL, then the second word is a 
pointer to the base of the segment where 
the parameter resides. If the first word 
of the SIB isn't NIL, then it points to a 
Pool Descriptor. The contents of the 
first two words of the Pool Descriptor 
plus the contents of the second word of 
the SIB is a pointer to the base of the 
segment where the parameter resides. 
(Note that the first word of the Pool 
Descriptor contains the IB 
most-significant bits , and the second word 
contains the 16 least-significant bits. 
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Each word, however, is in the natural byte 
sex of the host processor. On processors 
that address the least-significant byte 
first, this means that the bytes are in 
this order: second most-significant, 
first most-significant, fourth 
most-significant, third most-significant.) 

The exact location of the parameter is 
given by the segment base plus the 
contents of the second word on the stack 
(tos-1), which is an offset into the code 
segment . 

The following figure illustrates this 
accessing scheme. Note that cases 1 and 2 
produce a 16-bit address which is relative 
to the base of the p-System Stack/Heap 
area. Case 3, however, produces a 32-bit 
absolute physical address. (For a full 
description of these mechanisms , refer to 
the Internal Architecture Reference 
Manual . ) 
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TOS-1 
TOS 



CASE 1 

IF TOS = NIL 



PARAMETER 




PARAMETER 



IF 1ST 
WORD OF 
SIB = NIL 



BASE OF 
SEGMENT 



CASE 3 



r TOS-1 



TOS 



IF TOS ^ NIL 
1 



EREC 



StB 



PARAMETER 



BASE OF 
SEGMENT 



POOL DESCRIPTOR 




IF 1ST 
WORD OF 
SIB ^ NIL 



Figure 1-2. String and Byte 
Array Paraineters 
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Example of Linking to Pascal 

Note that in the following example the host 
program passes control to the beginning of 
an assembly procedure whether or not machine 
instructions are there. Tlierefore, all data 
sections you allocate in the procedure must 
either: (1) occur after the end of the 
machine instructions; or (2) have a jump 
instruction branch around them. 



PROGRAM 


EXAMPLE; i PascaL 


host program > 


const size - 80; 






var i , 


,j,k: integer; 






Istl: array CCO 


. .9] of char; 


t 


PRT and LST2 get allocated here > 


procedure. do_ nothing; 


external; 


function nul L_func(xxyxx 


,^z:1nteger) 






integer; external; 


begin 








k := 45; 






do nothing; 






■ j' := 1 


nul I f unc (k,s i ze) ; 




end. 








.PROC 


OONOTHING 




underscores are not 








significant in Pasal 


.CONST 


SIZE 




can get at s i ze 








constant i n host 


.PUBLIC 


I,LST.1 




and also these two 








global vars 


.DEF 


TEMPI 




this allows NULLFUNC 








to get at tempi 








code starts here... 


POP 


RETURN1 




return addr pushed on 


POP 


RETURN2 




stack 






f 


does nothing 


PUSH 


RETURN2 




set up stack for 


PUSH 


RETURN1 




return 


RETL 














data area 


RETAOR 


.EQU TEMPI 






TEMPI 


.WORD 






RETURN1 


.WORO 






RETURN2 


.WORD 












end of procedure 








DONOTHING 


.FUNC 


NULLFUNC,2 






.PRIVATE PRT,LST2:9 




10 words of 








private data 


.REF 


TEMPI 




references data temp 








in DONOTHING 








code starts here 
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POP. 


RETURN1 


/ 


... . . ,. ^ ^ 

save return address 


POP 


RETURN2 






POP 


PRT ■ 


/ 


get parameter ' z ' 


. . POP 


LST2-t-4 


; 


get parameter 'xxyxx* 


POP 


TEMPI 


. / 


toss 1 word of junk. 








Cfuntion return area) 








performs null action 


PUSH 


LST2+A 


; 


return xxyxx as 






r 


result 


PUSH 


RETURNS 




restore subr Link 


■ PUSH 


RETURN1 






RETL 






return to caL L ing 








progratn 








data starts here 


RETURN1 


.WORE> 






RETURN2 


.WORD 












erid of assembly 


.END 









Stand-Alone Applications 

The p-System assembler can produce absolute 
(core image) code files for use outside of 
the p-System's run-time environment. 

The p-System doesn't include a linking 
loader or an assembly language debugger, as 
the p-machine architecture isn't conducive 
to running programs (whether high or low 
level) that must reside in a dedicated area 
of memory. You are responsible for loading 
and executing the object code file; do this 
by using the p-System, with the 
understanding that the existing run-time 
environment may be jeopardized in the 
process. (For some ideas on how to create a 
Pascal loader program, refer ahead, in this 
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chapter, to the paragraph, "Executing 
Absolute Code Files.") 

Use Conpress utility for a much easier and 
more versatile way of doing this task. It 
allows you to relocate and coirpact code. 
Refer to Appendix B. 



Assembling 

Use the .ABSOLUTE and .ORG directives to 
create an object code file suitable for 
use as an absolute core image. .ABSOLUTE 
causes the creation of nonrelocatable 
object code, and .ORG can initialize the 
location counter to any starting value. 
Limit a source file headed by .ABSOLUTE to 
no more than one assembly routine; 
sequential absolute routines don't produce 
continuous object code and can't be 
successfully linked with one another to 
produce a core image. 



The code file format consists of a 
one-block code file header followed by the 
absolute code. It is terminated by one 
block of linker information; thus, 
stripping off the first and last block of 
the code file leaves a core image file. 
You should use .ABSOLUTE in only one 
routine; though linker information is 
generated, it's difficult to link absolute 
code files to produce a correct core image 
file. 
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Executing Absolute Code Files 

The following section describes one method 
of using the p-System to load and execute 
absolute code files. The program outlined 
isn't the only solution. You can also use 
the system intrinsics to read and /or move 
the code file into the desired memory 
location; however, this requires a 
knowledge of where the p-machine emulator, 
operating system, and your program reside 
in order to prevent system crashes by 
accidentally overwriting them. The 
program outlined below allows you the most 
freedom in loading core images; the only 
constraint is that the assembly code 
itself isn't overwritten while being moved 
to its final location. You can detect 
this possibility before proceeding with 
loading. 

NOTE: In most cases, loading object code 
into arbitary memory locations, while a 
p-System is resident, adversely affects 
the system; the absolute assembly language 
prograjti is then on its cwn, and rebooting 
may be necessary to revive the p-System. 

The loader program consists of : 

1. A host program that calls two external 
procedures . 

2. One or more linkable absolute code 
files to be loaded. (.RELPROCs aren't 
allowed. ) 
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3. A small assembly procedure, 
M0VE_AND_GO, that moves the above 
object code files from their system 
load address to their proper locations 
and then transfers control to them. 

4. A small assembly language procedure, 
LOAD_ADDRESS , that returns the system 
load addresses of the assembly code to 
the host program. 

The absolute code files ai*e assembled to 
run at their desired locations, and 
M0VE_AND_GO contains the desired load 
addresses of each core image. Both 
LOAD_ADDRESS and MOVE_AND_GO have externa], 
references to the core images; these are 
used to calculate the system load address 
and oode size of each image file. The 
whole collection is linked and executed. 
The host performs the following actions: 

1. Print the result of calling 
10AD_ADDRESS to determine whether the 
area of memory in which the p-System 
loaded the assembly code overlays the 
known final load address of the core 
images. 

Issuing a prompt to continue, so that 
the program can be aborted if a 
conflict arises. 
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OPERATION OF THE ASSEMBLER 

You call the system assembler by pressing 'A' 
with the operating system Command menu 
displayed. This corrmand executes the file named 
SYSTEM. ASSMBLER. (Note the missing 'E' in the 
file name; this is required to conform to the 
file system's restrictions on file name 
lengths.) If this isn't the name of the desired 
assembler version, be sure to save the existing 
file 'SYSTEM. ASSMBLER/ under a different name 
before changing the desired assembler's name to 
• SYSTEM. ASSMBLER ' . Assemblers that aren ' t in 
use are usually saved with a file name such as 
'ASM8086.CODE' . 



Support Files 

The p-System Assanbler has two associated 
support files: an opcodes file and an error 
file. Always store these along with the 
assembler code file. 



1-89 



The Assembler 



In order for the assembler to run correctly, 
the proper opcodes file must be present on 
some on-line disk. The opcodes file has a 
name such as Z 80. OPCODES, 9900. OPCODES , and so 
forth. The opcodes file contains all 

predefined symbols (instruction and register 
names) and their corresponding values for the 
associated assembly language. If the opcodes 
file isn't on-line, the assembler writes 
' <opf ilename> not on any vol' and aborts the 
assembly. The 8086 assembler uses an 

additional opcodes file called 8087, FOPS. 
This is only necessary when you are 
prograntning for the 8087 floating point 
processor. 

The assembler also has an error file that 
contains a list of processor-specific error 
messages. The error file has a name such as 
8080. ERRORS, 68K. ERRORS, and so forth. The 
error file need not be present to run the 
assembler, but it can aid greatly in 
eliminating syntax errors from a newly written 
program. 



Setting Up Input And Output Files 

When you first call the assembler from the 
Command menu, it attempts to open the work 
file as its input file; if a work file exists, 
the first prompt will be the listing pronpt 
described in the next paragraph, "Responses to 
Listing Prorrpt," and the generated code file 
will be named ' SYSTEM. WPX. CODE ' . If not, this 
prorrpt appears: 

Assemble what text? 
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Enter the file name of the input file; then 

press <return>. Pressing only <return> aborts 

the assembly; otherwise, the next prompt 
appears : 

To what codefite? 



Enter the desired name of the output code 
file, followed by pressing <return>. 

Pressing only <return> here causes the 
assembler to name the output 
'*SYSTEM.WRK.CODE' , but pressing causes 
the code file to be created with the same file 
name prefix as the source file. The assembler 
then displays its standard listing pronTot. 



Responses to Listing Proii5)t 

Before assembling begins, the following prompt 
appears on the console: 

8086 Assembler CversionU 

Output file for assembled Listing: C<CR> for none) . 
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At this point, you may respond with one of the 
following: 

1. The <esc> key followed by <retiirn>; this 
aborts the assembly and returns you to the 
Conmand menu. 

2. 'CONSOLE:' or this sends an 
assembled listing of the source program to 
the screen during assembly. 

3. 'PRINTER:' or '#6:'; which sends an 
assembled listing to the printer unit. 

4. 'REIVDUT:' or '#8:'; which sends an 
assembled listing to the REMOTE unit. 

5. A carriage return; >^ich causes the 
assembler to suppress generation of an 
assembled listing and ignore all listing 
directives. 

6. All other responses cause the assembler to 
write the assembled listing to a text file 
of that naine; any existing text file of 
that name is removed in the process. For 
instance, the following responses cause a 
list file named 'LISTING. TEXT' to be 
created on disk unit 5: 

#5 : L isting.text 
#5: Listing 
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In all cases, it's your responsibility to 
ensure that the specified unit is on-line; the 
assembler will print an error message and 
abort if it is requested to open an off-line 
I/O unit. 



Output liodes 

If you send an assembled listing to the 
console, then that listing is displayed on the 
screen during the assembly process; however, 
if you send the listing to some other unit or 
if no listing is generated, the assembler 
writes a running account of the assembly 
process to the screen for your benefit. One 
dot is written to the screen for every line 
assembled; on every 50th line, the number of 
lines currently assembled is written on the 
left side of the screen (delimited by angle 
brackets ) - 

When the assembler processes an include file 
directive, the console displays the current 
source statertent: 

.INCLUDE .<f iLe name> 



This allows you to keep track of which include 
file is currently being assembled. 
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At the end of the assembly, the console 
displays the total number of lines assembled 
in the source program and the total number of 
errors flagged in the source program. 



Responses to Error Prompt 

When the assembler uncovers an error, it 
prints the error number and the current source 
statement, (If applicable to the error; this 
doesn't apply to undefined labels and system 
errors . ) The assembler then attempts to 
retrieve and print an error message from the 
errors file- If the errors file can*t be 
opened— the file doesn't exist or there isn't 
enough memory— no message appears. This is 
followed by the menu: 

<sp>Ccon.tinue> , <esc>(terminate> ;e E(dit 

Pressing 'E' calls the editor, pressing 
<space> continues the assembly, and pressing 
<esc> aborts the assembly. The following 
restrictions exist when you call the editor or 
attenpt to continue: 
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1. In most cases, pressing <space> restarts 
the assembly process with no problems; 
since assembly language source statements 
are independent of one another with respect 
to syntax, it's not difficult for the 
assembler to continue generating a code 
file. Ihus, a code file will exist at the 
end of an assembly if you press <space> for 
every (nonfatal) error prorrpt that appears; 
of course, the code produced may not be a 
correct translation of your source program. 
The assembler considers certain system 
errors fatal; these errors abort the 
assembly r^ardless of how you respond to 
the preceding menu. 

2. If you press *E', the system automatically 
calls the editor. Unless you are using a 
work file, the editor prompts you for a 
file name. You should indicate the file 
currently being assembled. The editor 
positions the cursor at the location where 
the error occurred. 



Miscellany 

At the end of an assembly, an error message 
is printed for each undefined label. In 
some cases, you can ignore occurrences of 
undefined labels if these labels are 
semantically irrelevant to the desired 
execution of the code file. The resulting 
code file will be perfectly valid, but the 
references to the nonexistent labels won't 
be corrpletely resolved. 
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In addition to generating a code file, the 
assembler makes use of a scratch file, which 
is always removed from the disk upon normal 
termination of the assembly- Occasionally 
though, a system error may occur that 
prevents the assembler from removing this 
file; if this happens, a new file named 
'LINKER. INFO' may appear. You can easily 
remove it since it's entirely useless 
outside of the assembler. This should occur 
rarely if at all. 
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ASSEMBLER OUTPUT 

The assembler can generate two varieties of 
output files. It always produces a code file, 
but you can control whether or not it generates 
an assembled listing of the source file- 

An assembled listing displays each line of the 
source program, the machine code generated by 
that line, and the current value of the location 
counter. The listing may display the expanded 
form of all macro calls in the source program - 
Any errors that occur during assembly contain 
messages printed in the listing file, usually 
immediately preceding the line of source code 
that caused the error. A symbol table is 
printed at the end of the listing; it's the 
directory for locating all labels declared in 
the source program. 

An assembled listing of a source program printed 
on hard copy is one of the most effective 
debugging aids available for assembly language 
programs; it's equally useful for off-line, 
'mental* debugging and for use with system 
debuggers . 

A description of the code file format is beyond 
the scope of this document. See the Internal 
Architecture Reference Manual. 
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Source Listing 

When you respond to the assembler's listing 
prompt with a list file name, a paginated 
assembled listing is produced • The default 
listing is 132-characters wide and 55 lines 
per page. Each line of a source program is 
included in the assembled listing, except for 
source lines that contain list directives. 
Source statements that contain the equate 
directive .EQU have the resulting value of the 
associated expression listed to the left of 
the source line. 

Macro calls are always listed, including the 
list of macro parameters and the comment 
field, if any. The macro is expanded by 
listing the body (with all formal parameters 
replaced by their passed values) if the macro 
list option was enabled when the macro was 
defined. Macro expansion text is marked in 
the assembled listing by the character 
just to the left of the source listing. 
Comment fields in the definition of the macro 
body aren't listed in macro expansions. 

Source lines with conditional assembly 
directives are listed; however, source 
statements in an unassembled part of a 
conditional section aren't listed unless the 
.CONDLIST directive has been used. 
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Error Messages 

Error messages in assembled listings have the 
same format as the error messages sent to the 
console, except that the prompt isn't 
included- (Refer back to the section, 

"Operation of the Assembler.") 



Code Listing 

The code field lies to the left of the source 
program listing. It always contains the 
current value of the D.ocation counter, along 
with either code generated by the matching 
source statement or the value of an expression 
occurring in a statement that includes the 
equate directive .EQU, All are printed in the 
default list radix of the assembler version 
being used in either hexadecimal or octal. 
(Refer ahead in this chapter to the section, 
"Example Assembled Listing.") Spaces delimit 
separately emitted bytes and words of code on 
the same line. 
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Forward References 

When the assembler is forced to emit a byte 
or word quantity that is the result of 
evaluating an expression that includes an 
undefined label, it lists a '*' for each 
digit of the quantity printed (for example, 
an unresolved hexadecimal byte is listed as 
'**', while an unresolved octal word appears 
as '******'). If you use the .PATCHLIST 
directive, the assembler lists patch 
messages every time it encounters a label 
declaration that enables it to resolve all 
occurrences of a forward reference to that 
label. The messages (one for every 

backpatch performed) appear before the 
source statement that contains the label in 
question; they look like this: 




With this feature, the listing describes the 
contents of each byte or word of emitted 
code. If you want the assembled listing to 
be especially clean and neat, use the 
,NOPATCHL.IST directive to suppress the patch 
messages , 
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External References 

When the assembler emits a word quantity 
that results from evaluating an expression 
that contains an externally referenced 
label, the value of that label (which can't 
be determined until link tl:ne) is taken as 
zero. Therefore, the emitted value reflects 
only the result of any assembly tiine 
constants that were present in the 
expression. 



Multiple Code Lines 

ScHTietimes, one source statonent can generate 
more code than can fit in the code field. 
In most cases, the code is listed on 
successive lines of the code field, with 
corresponding blank source listing fields. 
Three exceptions are the .ORG, ♦ALIGN, and 
.BLOCK directives; the code field for these 
arguments is limited to as many bytes as 
will fit in the code field of one line. 
This is because most uses of these 
directives generate large numbers of 
uninteresting byte values. 
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Symbol Table 

The symbol table is an alphabetically sorted 
table of entries for all symbols declared in 
the source program. Each entry consists of 
three fields; the symbol identifier, the 
symbol type, and the value assigned to that 
symbol. The symbol identifiers are defined 
in a dictionary printed at the top of the 
symbol table. Symbols equated to constants 
have their constant values in the third 
field, while program labels are matched with 
their location counter offsets; all other 
symbols have dashes in their value field, as 
they possess no values relevant to the 
listing. 
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Exdjnple Assembled Listing 

The following is an example assembled 
listing. It demonstrates several of listing 
features just discussed (including macro 
expansion, forward references, syntax 
errors, and the symbol table): 
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. 00001 




.PROC EXAMLE LISTING 




HH 


ooooj 












00001 0008 


CONST 8 


. EuU 


S^ 






00001 00 


VAR BYTE 


.BYTE 








0001 1 0000 


VAR WORD 


. VIOR D 








00031 0200 0400 0600 0800 TABLE 


.WORD 


2>,6,8,10>12,14,16,18,2'( 




OOOB] OAOO OcgO OEOO 1000 










00131 1200 1400 1600 










0019 OF OF OF OF OF OF OF ALL ONES 


.BLOCK 




















UUCJ I 




.MACRO 


SAMPLE MACRO %^ 






0023 1 




MOV 


AX XI 






UU« 1 




MOV 


. t)x'x2 






UUcJ 1 . . 




. EN DM 








UU^o 1 












UUc-5 1 Do fc*- 


START 


MOV 


BP,SP ; This 


the begi nni ng 


0025 i C5 5E 22 






BX, tBP+22H) 






MOVE 


AX,BX 










error 18: invalid 


structure 










00281 




MOVE 


AX>.BX 






00281 8B 07 




MOV 


AX><BX> 






002A1 3B 06 **** 




CMP 


AX, CONST 7 






002E| 74** 




JE 


END 






00301 




SAMPLE 


MACRO CONST 8, 


AX 




0030^ B8 08 OC 




MOV 


AX, CONST 8 






0033 1 8b do " 


. tf 


MOV 


DX,AX 






00351 8B C8 




MOV 


CX,AX 






-002f* 07 












0037] CB 


END 


RETL 








00381 












00381 


Symbol Table 


.ENf) 








A.B - Absolute LB 


- Label UD - 


Undefined MC - Macro 






RF ^ Ret DF 


- Def PR - 


Proc 


FC - Func 






PB .- Public PV 


- Private CS - 


Consts 








ALLONES LB 0019] 


C0NST7 " UO —- 


-1 CONSTS AB 00081 


END LB 


0037 


EXAMLELl PR —^1 


MOVE UD— 1 5AMPLEHA MC 1 


START LB 


0023 


TABLE LB 00031 


VARBYTE LB 0000 [ , VARWORD LB 0001 j ^ 






»»>C0NST7 












error 1: undefined label 










>»»MOVE 












error 1: undefined Label 










Assembly complete: 


28 lines 










3 errors flagged on this assedtbly 
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PROCESSOR-SPECIFIC 
INFORMATION 



Processor-Specific Information 



INTRODUCTION 



This chapter is intended to be used in 
conjunction with processor manuals distributed 
by the manufacturers of the various processors. 
These manuals provide syntax ^m"venticma for tlie 
instruction sets and address modes used by the 
corresponding assembler versions. The company 
chosen as a base for syntax conventions is 
listed for each version, along with a list of 
deviations from that company's syntax 
conventions. 
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LSI -11 /PDP-11 ASSEMBLER 



Syntax Conventions 

The 11 assonbler adheres to DEC standard 
syntax for opcode fields, register names, and 
address modes. The location counter symbol is 
an asterisk ' * ' . 



Sharing PME Resources 

The return address to the systOT is passed on 
the stack • Registers 0 and 1 are available to 
the assembly routine; other registers must be 
saved on entry and restored on exit. 



Memory Organization 

The 11 processor is byte-addressed and 
word-oriented; machine instructions and data 
words must be aligned to start on an even byte 
boundary. The byte sex is 

least-signif icant-by te-f irst . 



Default Constant and List Radices 

The default constant radix and default list 
radix are octal. 
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Z80 ASSEMBLER 



Syntax Conventions 

The Z80 assenbler adheres to Zilog standard 
syntax for opcode fields, register names, and 
address modes. The following conventions may 
deviate from this standard: 

• The syntax for exchanging the register pair 
AF and the alternate register pair 'AF' is 
the following: 

The location counter symbol is a dollar 
sign '$'• 



Sharing PME Resources 

The return address to the system is passed on 
the stack. All registers are available for 
use in the assembly routine. 



Memory Organization 

The Z80 processor is byte-addressed and 
byte-oriented. The byte sex is 

least-s ignif icant-by te-f irs t . 
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Default Constant and list Radices 



The default constant radix is decimal and the 
default list radix is hexadecimal. 
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6502 ASSEMBLER 



Syntax Conventions 

The 6502 assembler adheres to Rockwell 
standard syntax for opcode fields and register 
names. The following conventions may deviate 
from this standard: 

• Immediate operands are specified by using a 
preceding pound sign character: 



LABEL 


.EQU 5 




LDA 


#LA8EL 


; immediate 



• Zero-page addressing is achieved only by 
using absolute operands (that is, assembly 
time constants) with values between 0 and 
255: 



LABEL 


.EQU 5 




LDA 


LABEL 


; zero-page 



• Indirect addressing has the following form: 



Lt>A 


aiLABEL^X 


; indexed-indi rect 


(preindexing) 


LDA 


S»LABEL>Y 


; indi rect- indexed 


(post index i ng) . 


JMP 


3LABEL 


; indirect jump 





The location counter symbol is an asterisk 
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Sharing PME Resources 

The return address to the system is passed on 
the stack. All registers are available for 
use in the assembly routine. 



Memory Organization 

The 6502 processor is byte-addressed and 
byte-oriented. The byte sex is 

least-significant-byte-first. 



Default Constant and List Radices 

The default constant radix and default list 
radix are hexadecimal. 
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6800 ASSEMBLER 



Syntax Conventions 

The 6800 assembler adheres to Motorola 
standard syntax for opcode fields and register 
names. The following conventions may deviate 
from this standard: 

• All instructions which can specify the A 
and B registers have the register name 
separated from the opcode field: 



LDA 


A^ LABEL 








LDA 


A^O^X 


(instead 


of 


LDA A^X) 


LDX 


0,X 


(instead 


of 


LDA X) 


STA 


A,14,X 








PUL 


A 








ASL 


B 









• Immediate operands are specified by using a 
preceding pound sign character: 

LABEL .EQU 5 
LDA A,#LABEL ; ifflmediate 



• Zero-page addressing is achieved only by 
using absolute operands (that is, assembly 
time constants) with values between 0 and 
255: 

LABEL .EQU 5 
LDA B, LABEL ; zero-page 
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• Numbers in hex must always contain four 
digits (yes, even for bytes): 

.BYTE 0002H^OOA9H specifies ttie quantity 02A9 base 16 

The location counter symbol is an asterisk 



Sharing PME Resources 

The return address to the system is passed on 
the stack. All registers are available for 
use in the assembly routine. 



Memory Organization 

The 6800 processor is byte-addressed and 
byte-oriented. The byte sex is 

most-significant-byte-first. 



Default Constant and List Radices 

The default constant radix is decimal and the 
default list radix is hexadecimal. 
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8080 ASSEMBLER 



Syntax Conventions 

The 8080 assembler adheres to Intel standard 
syntax for opcode fields, register names, and 
address modes. The location counter symbol is 
a dollar sign . 



Sharing PME Resources 

The return address to the systOT is passed on 
the stack. All registers are available for 
use in the asseinbly routine. 



Memory Organization 

The 8080 processor is byte-addressed and 
byte-oriented. The byte sex is 

least-significant-byte-first. 



Default Constant and List Radices 

The default constant radix is decimal and the 
default list radix is hexadecimal. 
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9900 ASSEMBLER 



Syntax Conventions 

The 9900 assembler adheres to TI standard 
syntax for opcode fields, register names, and 
address modes. The following conventions may 
deviate from this standard: 

• In operand fields, the lack of an address 
mode character (for example, a '@' or 
preceding the operand) defaults to 
The location counter symbol is a dollar 
sign 



Sharing PME Resources 

The return address to the system is passed in 
register 11. Registers 0 thru 5 are available 
to the assembly routine; other registers must 
be saved on entry and restored on exit. 



Memory Organization 

The 9900 processor is byte-addressed and 
word-oriented; machine instructions and data 
words most be aligned to start on an even byte 
boundary. The byte sex is 

most-signif icant-by te-f irst . 
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Default Constant and List Radices 



The default constant radix is decimal and the 
default list radix is hexadecimal. 
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6809 ASSEMBLER 



Syntax Conventions 

The 6809 Assembler adheres to Motorola 
standard syntax for opcode fields and register 
names* The following conventions may deviate 
from this standard: 

• Immediate operands are specified by using a 
preceding : 

• Indirect addressing is specified by a 
single leading at sign ('@') instead of 
square brackets ( ' [ ] ' ) : 

- LDX. aTHERE,PCR 

• Zero-p£Lge addressing is achieved only by 
using operands that are absolute (for 
exainple, not labels) and less than 256: 

ZEROPAGE .EQU 15 
LDB ZEROPAGE 
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Sharing PIIE Resources 

The return address to the system is passed on 
the stack. Registers Y and U mfust be saved 
and restored if they are to be used. All 
other registers are available for use. 



Memory Organization 

The 6809 processor is byte-addressed and 
byte-oriented. The byte sex is 

most-significant-byte first. 



Default Constant and List Radices 

The default constant radix is decimal and the 
default list radix is hexadecimal. 
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Z8 ASSEMBLER 



Syntax Conventions 



Symbols 

The Z8 Adaptable Assembler adheres to Zilog 
standard syntax (refer to the Z8 PLZ/ASKt 
Assembly Language Programming Manual) for 
opcode fields, register names, and 
addressing modes. 



Numeric Constants 

The Z8 Assembler follows the constant 
conventions of other adaptable assemblers, 
except that octal constants are indicated by 
a radix switch character of '0' rather than 
'Q' , and binary constants are indicated by a 
radix switch character of 'B' rather than 











011101B 


OB 


14670 


1111G0 



Predefined Constants 

There are no predefined constants in the Z8 
Assembler. Specifically, the constants 
'%L', '%T', 'ToR', '%P', '%%', and '?Q' in 
Zilog syntax are NOT allowed. 



2-16 



Processor-Specif ic Information 

Sharing PME Resources 

No F^ffi is currently available for the Z8. 

UEsmTj Organization 

The Z8 processor is byte-addressed and 
byte-oriented. The byte sex is 

least-significant-byte-first. 

Default and List Radices 

The default constant radix is decimal and the 
default list radix is hexadecimal. 
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8086/8088/8087 ASSEMBLER 



Syntax Conventions 

The p-System 8086/88/87 Assembier differs in 
some respects from the standard Intel 
assembler. This section lists these 
differences. 

Assembler Directives. None of the Intel 
assembler directives are implemented. 
Instead, the assembler directives described in 
Chapter 1 of this manual are available. 

Parenthesis. Enclose index or base register 
references in a menx>ry operand in parentheses , 
not square brackets; for example, FIRST(BX) 
rather than FIRST [BX]. Group expressions with 
angle brackets rather than parentheses. 

Immediate Byte. Code ADD innmediate byte to 
memory operand as: 

ftDDBlM fliemop^ifnmedbyte 



to distinguish it from the ADD memop, 
irrmedword, which is the default. Similarly, 
MOVBIM, ADCBIM, SUBBIM , SBBBIM, CMPBIM , 
ANDBIM, ORBIM, XORBIM, and TESTBIM are added 
to the vocabulary. 
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Memory Byte. Code INC memory byte as: 

INCWB memop 



to distinguish it from INC memory word, which 
is the default. Similarly, DBCMB, MULMB, 
IMUIJ^, DIVMB, IDIVMB, NOTMB, NEGMB, ROLMB , 
RORMB, RCLMB, RCRMB, SAIMB, SHIiffi, SHRMB, 
SARMB are added to the vocabulary to specify 
memory byte operands. 

Direct Addressing Mode. Code VDV with direct 
addressing as: 

HOVM AX,020EFH 
MOV« 02DEFH^AX 



to distinguish it from MOV immediate value 
which is the default. Similarly, ADa^, ADM, 
ANDM, CMPM, ORM, SBBM, TESTO, and XORM are 
added to the vocabulary for use with direct 
addressing. 



2-19 



Processor-Specif ic Information 



MUL and DIV Byte. In MUL, IMUL, DIV, IDIV 
the single memory operand form, 




implies a word operation. To specify a byte 
operation, you may use either MULMB memop, or 
the form 









MUL 


AL, memop 





The saiDe holds true for IMUL, DIV, IDIV. 
(Note that DIV AL, memop is rather misleading, 
as the actual operation would be 
AX /memory-byte . ) 

MOV Substitute for LEA. For LEA reg, label or 
liEA reg , label +const the assembler substitutes 
MOV reg,immedval where immedval = label or 
label+const. This saves four clock times (4 
versus 8). 

IN and OUT. The normal form of IN and OUT is 
IN acport or IN ac,DX and OUT port,ac or OUT 
DX,ac where ac=AL denotes an 8-bit data path 
and ac=AX denotes a 16-bit path. Since the 
accumulator is the only possible register 
source/destination (DX specifies port=address 
in DX) , single operand forms are also 
provided: INB and OUTB for byte data, and INW 
and OUTW for 16-bit data. The syntax is INB 
port or INB DX. 
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In the two-operand forms of IN and OUT, the 
order of the operands isn't important; thus 
OUT ac,DX or OUT ac,port will be acceptable. 

String Operations. The mnemonics for the 
string operations are suffixed with B or W to 
denote byte or word operations ; thus , MOVSB 
and MOVSW, OfPSB and CMPSW, SCASB and SCASW, 
LODSB and LODSW, and STOSB and STOSW are in 
the vocabulary, but MOVS-STOS aren't. 

Segment Override. XI AT and the string 
instructions (9) have implied memory operands 
and nothing is required to be coded in the 
operand field. However, to permit you to 
specify a segment override prefix in the case 
of XI AT, MOVSB/MOVSW, CMPSB/aiPSW, and 
LODSB/LODSW, the assembler permits operand 
expressions for these instructions. 

NOTE: That only the default segment for SI, 
namely DS, can be overridden. The segment for 
DI is ES and can't be overridden. A segment 
override prefix of DS applied to SI doesn't 
generate a segment override prefix. 

If you were to write these operations with 
operands, they would have this syntax: 

XLATAL^(BX) ^"i^^^ 
MOVS{B/W>(l)I) ^Cseg:: (S I) 
CMPStB/WXDI) ^Cseg:D (SI) 

SCAS<B/W>(DI),AX • 

LODS-CB/W>AX,i:seg:T (SI) 

STOS-CB/WXDD^AX 
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You may prefix the string instructions with a 
REP (repeat) instruction of some type. The 
assembler flags an error if you specify both 
REP and a segment override. 

In addition to the forms DS:memop, and so on, 
you may write a separate mnemonic SEG followed 
by a segment register name in a statement 
preceding the instruction mnemonic. For 
example: 



is equivalent to: 

SEG ES MOV AX, A VALUE 



Long Jumps, Calls, and Returns. Implement 
intersegment CAJJj, RET, and JMP as follows: 

1. The mnemonics CAILL, RETL, and JMPL 
specifically designate intersegment 
operations . 

2. An indirect address (for example, (reg) or 
(label)) is assembled in standard fashion 
with a "mod op r/m" effective address byte 
possibly followed by displacement bytes. 
The menory location referenced must hold 
the new IP, and the next higher location 
must hold the new CS. 
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3. The direct address form must have two 
absolute operands: 

CALLL expr1,expr2 

where exprl is the new IP and expr2 becomes 
the new CS. Constants or external symbols 
(for example, .REF definitions) qualify as 
absolute operands, 

8087 Mnemonics. Mnemonics for the 8087 
floating point operations are standard except 
for some of the memory reference operations , 
where a letter suffix is appended to denote 
the operand size: 

D short real or short integer (double word) 

Q long real or long integer (quad word) 

W integer word 

T terT5)orary real (ten byte) 

The 'D' and '0' suffixes apply to the 
following real ops: 

FADD, FCOM, FCCMP, FDIV, FDIVR, FMUL, 
FST, FSUB, FSUBR, FID, FSTP 

For example, FADDD, FADDQ, and so. 

The 'T' suffix applies only to FID and FSTP. 
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The 'W and suffixes apply to the 

following integer ops: 

FIADD, FICOM, FICOMP, FIDIV, FIDIVR, 
PIMUL, FIST, FISUB, FISUBR, FILD, 
FISTP 



The '0' suffix for long integers applies only 
to FILD and FISTP. 



Sharing FME Resources 



Calling and Returning 

The p-machine emulator (PME) calls an 
assembly routine using the call long (CALLL) 
operator. Thus, the top of the stack 
contains a two-word return address upon 
entering into the routine. In order to 
return frcxn an assembly routine, use the 
return long (RETL) operator. 
(Alternatively, the return address can be 
popped and a jump long (JMPL) operation 
used. ) 
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Accessing Parameters 

The 8086/88 Processor contains instructions 
that facilitate accessing parameters passed 
to an assembly routine. By moving the value 
of SP (which points to the pnmchine staoll) 
into BP, you can access the parauieters by 
adding an offset of 4 bytes (to account for 
the two-word return address). The first 
parameter, located four bytes above the top 
of the stack, Is actually the last declared 
parameter in the host routine (the 
parazneters are pushed in the order that they 
are ieclstred). 

If a ,FUNC assembly routine is to return a 
function value, you should place it just 
above the last parameter (which is just 
before the first declared parameter) using 
the same accessing scheme. The size of the 
returned function value is either one, two, 
or four words as described in a previous 
paragraph called, "Linking with a Pascal 
Pro^rajn. " 

You may give the RETL operator an operand 
that indicates how many bytes to cut the 
stack back after popping its two-word return 
address. Use the size of the data space 
occupied by the parameters. Thus, 
paraineters tmj be accessed, and a clean 
rettirn imde, without aver using a specific 
POP or PUSH instructloi. 
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The following is an example of this scheme 
of accessing parameters and returning: 



HOV 


BP,SP 




MOV 


AX,(BP+A> 


;Last Pa ram 


MOV 


BX,(BP+6) 


;MiddLe Param 


MOV 


CX,(BP+8) 


;Fi rst Pa ram 


MOV 


(BP+10)^RSLT 


;F"unc.t ion return vat 






; (if .FUNO 


RETL 


6 


;Remdv« 5 pa rams 



Register Usage 

All of the 8086/88 registers are available 
for use by your assembly routines (the P^ffi 
saves and restores the register values that 
it needs). 

However, you must preserve SS and SP. (You 
may create and use a private stack if a 
minimum of 40 words are left available for 
stack expansion during interrupts. This is 
a very dangerous procedure, however, and is 
not recommended . ) 

NOTE: You must maintain the integrity of 
the p-machine stack. If you don't, the 
results can't be predicted. 
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Upon entering into the assembly routine, SS 
points to the base of the p-machine stack 
and data area. Also, DS, ES, and CS are all 
equal to the base of the p-System code 
segment . 

Parameters that are passed as Pascal VAR 
variables are p-System pointers to actual 
data. These pointers are relative to SS. 
For exajnple: 



HOVBX, CBP+4) 


; pick 


up parameter (poi 


'nter) . ' ' . . . ' ": 


MOVAX, SS; CBX) 


; pick 


up VAR parameter 


vaLae : .■ ■ ' '•. ■ ' *• 



.PRIVATE and .PUBLIC variables are also SS 
relative. For example: 

. .PRIVATE COUNTER ' .' " ' ' ', ' ■ . 

HOy AX,SS: COUNTER ' ^ • _ ' ' 



.BYTE quantities, .WORD quantities, and 
.REF'ed labels are relative to CS, DS , or 
ES. 



Memory Organization 

The 8086 processor is byte-addressed and 
byte-oriented. The byte sex is 

least-significant-byte-first. 
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Default Constant and List Radices 



The default constant radix is decimal. The 
default list radix is hexadecimal. 
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68000 ASSEMBLER 



Syntax Conventions 

The 6B00 Assemble!* follows Motorola standard 
syntax for opcode fields, register names and 
address modes. The following list points out 
scxae restrictions. 

• Only the aosoiate short address mode is 
available. The absolute long address can't 
be generated by the assenbler. 

• Labels may not be accessed with the 
absolute address mode. 

• References to labels with a .PROC or .FUMH 
generate the PC-relative address mode. 

• An external la' 3I vay only be accessed as a 
displacement from an address register. 

• Inmedlates above FFFPH can't be generated* 

• Opcodes ^ich have an optional suffix of A, 
I, M, Q or X must contain that saiffix 
explicitly . 

• Length qualifiers (.B, .W or .L) must be 
specified explicitly in those instructions 
which have a choice of length. All other 
instructions must not contain a length 
qualifier. 
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The following instuctions must contain a 
length qualifier: 



ADD, ADDA, ADDI , ADDQ, ADDX, AND, ANDI, 
ASL (register), ASR (register), CLR, 
GAP, CMPA, CMPI, Omi, BOR, BORI , EXT, 
I^L (register), LSR (register), MOVE 
(except special forms), MOVEA, MOVEM, 
MOVEP, NEG, NBGX, NOT, OR, ORI , ROL 
(register), ROR (register), ROXL 
(register), ROXR (register), SUB, SUBA, 
SUB I, SUBQ, SUBX, TST 



The following instructions must not contain a 
length qualifier: 



ABCD, ASL (memory), ASR (memory), BCHG, 
BCLR., BSET, BTST, CHK, DBcc, DIVS, DIVU, 
EXG, MP, JSR, LEA, LINK, L^L (memory), 
LSR (memory), MOVE to OCR, MOVE to SR, 
MOVE from SR, MOVE USP, MOVEQ, MUIS, 
MULU, NBCD, NOP, PEA, RESET, ROL 
(memory), ROR (memory), ROXJ^ (memory), 
ROXR (memory), RTE, RSR, RTS , SBCD, Sec, 
STOP, SWAP, TAS, TRAP, TRAPV, UNLK 



The following instructions may contain an 
optional length qualifier of .S (generate 
short forward branch): 

Bcc, BRA, BSR 
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Sharing FME Resources 

An assembly languaige procedure is called via a 
JSR instruction, so it should expect a double 
word return address on the stack. It is usual 
to return via an RTS instruction. 

Registers A0-A2 and D0-D7 are available for 
use. Register A3-A7 must be restored to the 
values at call-time if they are used. 

Since pointers within the p~machine are byte 
offsets from a base register (A6) , .PUBLIC 
references to Pascal variables will generate 
an offset, not the actual address, of the 
variable. In order to access an external 
variable, it is necessary to use this offset 
as a displacement from A6. For example: 

ADDQ.W #1,A8C(A6) 



will increment the Pascal variable ABC, 
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A variable parameter is a p-machine pointer to 
the paraineter, so it is also accessed as 
above. For example, a variable parameter may 
be accessed as follows: 



. HOVEQ 


no,b7 


. ; clear the upper half of D7 . ; 


MOVE.W 


4CSP),D7 


; Load the pointer (parameter) \ - 






; increment the variable • 



References to variables in other asse^ibly 
language procedures (via a .REF) may be 
accessed as above using (A2) , provided the 
segment the procedures are in is located in 
the data area (for example, it isn't a 
RELPROC). 

Here is a list of the register values 
available to the assembly language procedure 
on entry: 

• A2 - base of current segment 

■ A3 - base of PME . 

A4 - p-machlne program counter • 

A6 "pointer to datg area 




2-32 



Processor-Specific Information 



The .INTERP directive (used to access items in 
the Bffi) is ignored. Instead, accesses should 
be made relative to A3 (the base of the PME). 
The following entry-points are available to 
the assembly language programmer: 



routine 


offset 


paramete'rs- 


XEQERR 


04H 


DO.W - executicwi error number 


NATRET 


08H 











XEQERR may be used to cause an execution error 
to be recognized from assembly language - 
XEQERR should be jumped to, not called. 
Before jumping to XEQERR, the stack should be 
clear of all parameters (including the return 
word), and all registers should be restored, 
This routine is normally used for system work. 

NATRET is the entry-point used by 
automatically generated native-code to return 
to the p-System. It shouldn't be used for any 
other purpose. 



Memory Organization 

The 68000 processor is byte-addressed and 
word-oriented. The byte sex is 

most-significant-byte first. 



Default Constant and List Radices 

The default constant radix is decimal, and the 
default list radix is hexadecimal. 
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APPENDIX A 
THE LINKER 



The linker is an item on the Commnd menu which 
alloWvS assembled code to be linked into a host 
program. The linker may also be used to link 
together separately assonbled pieces of a single 
assembly program. 

The linker is a program of the sort called a 
"link editor." It stitches code together by 
installing the internal linkages that allow 
various pieces to functon as a unified whole. 

When a program that must be linked is R(un, the 
linker is automatically called and searches 
*SYSTEM. LIBRARY for the necessary external 
routines. If you use X(ecute, instead of R(un, 
or the assembled routines aren't in 
SYSTEM. LIBRARY, you are responsible for manually 
linking the code before executing it. 

When the linker is called automatically and 
can't find the needed code in *SYSTEM. LIBRARY, 
it responds with the following error message. 

Proc^ . 
Func^ 

Global, . ■ . ' " 

or Public <identifier> undefined 



In order to manually use the linker, select 
L(ink from the Command menu. 
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Using the Linker 

The linker displays pronrpts asking for several 
file names. It reads and links code together, 
and displays the names of the routines it is 
linking. The following paragraphs list those 
prompts and explain the use or responses. 

Host file? The host file should contain the 
code for the high-level program 
which references external routines. 
Alternatively, the host file may 
contain an assembled routine which 
references other assembled routines. 
The ".CODE" suffix is automatically 
appended to the file name that you 
specify (unless you terminate that 
name with a period). If you respond 
with <return>, the linker attempts 
to open the code work file as the 
host file. 

Lib file? Any number of library files may be 
specified. The prompt will keep 
reappearing until you press the 
<return> . Responding ' *<return> ' 
opens +SYSTEM. LIBRARY. The 
successful opening of each library 
file is reported. If the routines 
in a lib file reference other 
routines, those other routines are 
also linked into the output file 
(assuming that they are found in one 
of the lib files). 
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Exajnple (underlined portions are your input): 



Lib fUe? *<return> 
Opening *SYSTE«. LIBRARY 
Lib file? FIX.8<return> 
No file FIX.8.C0D€ 

Type <sp>(continue> , <esc><terminate) 
Lib file? FIX.9<return> 
Opening FIX. 9. CODE 
bad seg name 

Type <sp>(cantinue) , <esc>(terminate) ^ <space> 
Lib File? 



When the names of all library files have been 
entered, the linker reads all the necessary 
routines from the designated code files. It 
then asks for a destination for the linked code 
output : 

Output file? Respond with a code file name 
(often the same as the host 
file). The .CODE suffix must be 
included. If you press <return>, 
(*SYSTEM.WRK.CDDE) becomes the 
output file. 

After this last pron^jt, the linker comnences 
actual linking. During linking, the linker 
displays the names of all routines being linked. 
A missing or undefined routine causes the linker 
to abort with the ' <identif ier> undefined' 
message described above. 
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NOTE: Since the files may be assembled files, 
they may be of either byte sex. However, all 
files linked together mst be of the same byte 
sex. The linker produces a correct code file 
regardless of which byte sex that is or whether 
it is the same as the machine on which the 
linker is running. 

The code file produced by the linker contains 
routines in the order in which they were given 
in the library files. This is Important to note 
if the program is an assembly language file. 
The code file contains first routines from the 
host file and then library file routines, all in 
their original order. 
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The Compress utility program takes an input code 
file consisting of one or more linked assembly 
procedures. It produces an object file suitable 
for execution outside the p-System run-time 
environment. 

Compress can produce either relocatable or 
absolute object files. Absolute code files are 
relocated to the base address specified by you 
and contain pure machine code. Relocatable code 
files include a simplified form of relocation 
information (a description of its format is in 
this appendix). Both kinds of output files are 
stripped of all file information normally used 
by the system and must be loaded into memory by 
your program in order to execute properly. 



Preparing Code Files 

The assembly routines must be created with the 
assembler, and linked with the linker. Code 
files containing anything other than one segment 
of linked assembly code will cause Compress to 
abort. Routines to be ccnnpressed shouldn't 
contain any of the following assembler 
directives. 

.ORG .ABSOLUTE 
.PUBLIC .PRIVATE 
.CONST .INTERP 
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The .ORG and .ABSOLUTE directives produce 
absolute code files directly from the assembler. 
Code files that contain the .ABSOLUTE directive 
can be compressed, but the resulting code will 
be incorrect. 

The .PUBLIC, .PRIVATE, .CONST and .INTERP 
directives are used to communicate between 
assembly procedures and a host corrpilation unit 
(whether Pascal or some other language). These 
have no use outside of the system's run-time 
environment. Their inclusion in an assembly 
program generates relocation information in 
formats that will cause Cx^mpress to abort. 



Running Compress 

In order to run Compress, you should X(ecute 
COMPRESS .CODE. This utility displays the 

following prompt: 

Assembly Code File Compressor <release version> 
Type ' ! ' to escape 

Do you vfish to produce a relocatable object file? (Y/N> 



If you press 'N' , the following prompt appears: 

Base address of relocation (hex) : 
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This is the starting address of the absolute 
code file to be produced. It should be entered 
as a sequence of 1 to 4 hexadecimal digits 
followed by <return>. The prompt will reappear 
if an invalid number is entered. 

The following prompt always appears: 

Ft Le to compress : . . , • . 



Enter the naine of the file to be compressed. It 
isn't necessary to enter the '.CODE' suffix. If 
the file can't be found, the prompt reappears. 

Output fiLe C<ret> for same) : ■ -. . • . • . 



Enter the name of the output file, which can be 
any legal file name (Compress doesn't append a 
.CODE suffix). Pressing <return> causes the 
output file to have the same name as the input 
file, thus eliminating the original input file. 
If the file can't be opened, Compress will print 
an error message and abort. 

In all the previous prompts, pressing the 
character ' ! ' causes Compress to abort . 
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After receiving this information from you, 
Compress reads the entire source file, 
compresses the procedures, and writes out the 
entire destination file. Large code files may 
cause Conpress to abort , if the system doesn ' t 
have sufficient memory space. 

While running, Compress displays for each 
procedure the starting and ending addresses (in 
hexadecimal) and the length in bytes. After 
finishing, the total number of bytes in the 
output file is displayed. If an absolute code 
file is produced, the system displays the 
highest meryory address to be occupied by the 
loaded code file. 

Compress produces a file of pure code, which 
must be loaded and executed directly by your 
software. 
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Action and Output Specification 

Compress removes the following information from 
input files: 

• The segment dictionary (block 0 of code 
file). 

• Relocation list and procedure dictionary 
pointers . 

• Symbolic segment name and code sex word. 

• Embedded procedure DATASIZE and EXITIC words, 

• Procedure dictionary and number of procs 
word. 

• Standard relocation list. 

Procedure code in the output file is contiguous, 
except for padding bytes , which are enitted 
(when necessary) to preserve the word alignment 
of all procedures. Code files always contain an 
integral number of blocks of data and space 
between the end of the executable code. The end 
of the code file is zero-filled. 

Relocatable object files must be formatted in 
the following way. The relocatable code is 
immediately followed by relocation information. 
The last word in the last block of the code file 
contains the code-relative word offset of the 
relocation list header. The following lines are 
an example. 

<starting byte address of Loaded code> + <word offset * 2> 

<byte address of relocation List header wo rd> ' ■ ■ .' ■ 
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The list header word contains the decimal value 
256, The next-lower-addressed word contains the 
number of entries in the relocation list. This 
word is followed (from higher addresses to lower 
addresses) by the list of relocation entries. 

Beneath the last relocation entry is a 
zero-filled word, which marks the end of the 
relocation information. Each relocation entry 
is a word quantity containing a code-relative 
byte offset into the loaded code. The following 
lines are an example: 

<starting byte address of loaded code> + <byte offset> 
= <byte address of word to be relocated> 



Each byte address pointed to by a relocation 
entry is a word quantity that is relocated by 
adding the byte address of the front of the 
loaded code. 

NOTE: If you relocate a file towards the high 
end of the 16-bit address space, you must ensure 
that the relocated file won't wrap around into 
low memory (that is, <re location base address > + 
<code file size> must be less than or equal to 
FFFF(hexadecimal)). Compress performs no 

internal checking for this case. 
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The first section in this appendix defines the 
memory allocation scheme for Fiscal data 
structures. (This is necessary to understand if 
you want to interface with these data structures 
from assembly language.) The second section 
gives assembly language coding examples (using 
the 8086 as the example processor) which 
interface with the various Pascal data 
structures. The final section contains some 
examples of typical routines that you might need 
to write. 
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PASCAL DATA STRUCTURES 



Given the following Pascal declaration: 



TYPE REC = RECORD 






FIELD INFIELD 2 : INTEGER: 






FIELD 3, FIELD 4 : REAL; 






FIEL[)_5 : CHAR; 






END; 






VAR A_RECORD : REC; 






The order of allocation of the fields is: 






FIELD_2 - 1 word for an integer 






FIELD_T - 1 word for an integer 






FIELD_4 - 4 words for a real 






FIELD_3 - A words for a real 






FIELD_5 - 1 word^ the low-order byte of which 


i s 


used 


In general, variables are allocated space using 


th< 


? following scheme:- 


Nth element of the first declaration List : 






(N-I)th element of the first declaration list. 






<N-2>th element of the first declaration list 






First element of the first declaration list 






Nth element of the second declaration list 






(N-1)th eLement of the second declaration list 






Nth element of the last declaration list 






First element of the last declaration List 






Using this scheme, the following two type declarations are 


allocated identically: 






TYPE REC1 ^ RECORD . 'v. ;. ■ 






A : INTEGER; . • : . . 






B : INTEGER; 






. . C : INTEGER; . ' . ' 






END; 






■ . ■-. ■, REC2 = RECORD • ' * ■ ■ 






C,B,A : INTEGER; 






. , END; • - ■. . 
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INTERFACING WITH PASCAL 

This section contains several examples of 
assembly language interfacing with the various 
types of Pascal data structures. 



Example 1: 

Passing Variables by Value 



program 


variables 


_to_assembly; 


<* this 


program w 


ill be used as a driver 


for a 


number of 


assembly 


rout ines *> 


function int by value (only param: integer): integer; external; 


begin 








writeLn(int by value<1)) 




end. 








.FUNC 


INT BY VALUE, 1 


; one word of parameters 


MOV 


BP^SP 




; store Stack Pointer into the 
; usable Base Pointer 


MOV 


AX^CBP+4) 




; the last-declared parameter. ^ . 
; in this case there is only one... 
; is 4 bytes down/up in the stack 
; because of the two word return 
; address on the top of the stack 


INC 


AX 




; just to do something 


MOV . 


(BP+6 ) ,AX 




; the return location for a function 
; always starts in the byte following 
; the "deepest*' parameter... 
; one parameter, a one word integer, 
; therefore, the next location is 
; two bytes further into the stack 


RETL 


2 




; there are two bytes of parameters 
; to be removed from the stack before 

; returning to Pascal note that the 

; function value is. not affected. 
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Example 2: 

Passing Variables by Reference 



program 


variables to_ai 


isembly; 


var 


parameter to routine: integer; 


procedure int by reference (var onLyparatn: integer); external; 


begin 






parameter to routine 


■ = 1; 


i nt_by 


referenceC parameter_to routine ); 


writeLnC parameter to 


routine ) 


end. 






,PROC 


INT_8Y_REFEReNCe,1 ; one word of parameters... 






; in this case it is a pointer 






; to the actual variable,,. 






; all pointers are relative to 






; the SS register at the start 






; of an assembly routine 


MOV 


BP^SP 


; familiar save of SP 


HOV 


BX,(BP + 4) 


; move only parameter into 






; BX. BX is used because 






; only certain registers may 






; be used for a particular 






; job...9X, SI or DI must 






; be used when addressing 






; through an offset 


HOV 


AX,SS:(BX) 


; fetch the value of the 






; parameter 


INC 


AX 


; just to do something 


MOV 


SS: (BX),AX 


; put the new value back 






; into the variable for 






; Pascal 


RETL 


2 


; two bytes of parameters 


.END 
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Example 3: 

Passing Pointers By Value 



program 


variables to_assembly; 






type 


pointer__to_int = 






ir^teger; 


var 


parameter to routine: 


pointer__to_int; 




function point by value 


(only 


param: pointer_to_i nt> : integer; 


external; 


begin 










new (parameter to routine); 






pa ramet er_to_rout i ne 






:= 1; 


writelnCpoint by vaLue< 


parameter_to_routine >> 




end. 










. FUNC 


P0INT_BY_yALUE,1 


f 


one word of parameter 










in this case, the actual 










value of a pascal pointer 








/ 


wiLL be passed 




MOV 


BP,SP 




f ami Liar 




MOV 


BX,(BP + 4) 




mov the parameter into 










BX...this will be a Pascal 










pointer which is relative 








r 


to the SS register 




MOV 


AX,SS:(BX) 


t 


using the parameter as a 










pointer — access the value 








r 


of the variable 




INC 


AX 




do something 




MOV 


(BP+6),AX 


/ 


store the new value into 










the function return word 




RETL 


2 




two bytes of parameters 




.END 











A-17 



Appendix C 



Example 4: 

Passing Pointers By Reference 



program vari abLes_to__asseiiibly; 

type pointer_tQ_int = integer; 
var parameter__to_routine: pointer_to_i nt; 

procedure point_by_ref erence (var onLy_param: pointer_to_int) ; external; 
begin 

new( parameter_to_rbut ine) ; 

param6ter_to_routine := 1; 

point_by_ref erencsC parameter_to_routirTe ); 

writeLn< parameter_to_rout ine ) 
end. 

.PROC P0INT_BY_REFERENCE,1 ; one word of parameters 

; 1n this case, the parameter 

; is a pointer to a Pascal 

; pointer. . .yeah, two leyeLs 

; of indi rection 

«0V BP,SP ; familiar 

MOV BJ<,(BP + 4) ; mov the parameter into BX. 

; BX because it is an offset 

MOV AX,SS:(BX) ; fetch the Pascal variable. . . 

; a pointer to an integer 

MOV BX,AX ; prepare to get actual value 

MOV AX,SS:<BX) ; fetch the value that is 

; pointed to by the Pascal 

; pointer 

INC AX ; do something 

MOV SS:(BX),AX ; store the new value in 

; the Pascal variable 
RETL 2 . y two bytes of parameters 
.Em - 
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Example 5: 

Passing Reals By Value 



program variable passing; 




function real by value (only parameter: real): real; external; 


begirt 






writelnCreal by valuedO.O) 


:4:1) ■ / , : - ■ ■ _ 


end. 






.fUNC 


REAL_BY_VALUE,4 ; 


4 words of parameters 






because reals are stored 






as four-word numbers 


MOV 


BP^SP ; 


f ami Liar 


MOV 


AX,(BP+4) ; 


Last word of parameter. \. 






the Low-order bytes of 






the mantissa 


MOV 


Bt,6, 




MOV 


NUMBER <BX), AX ; 


store the value 


MOV 


AX,(BP+6) 


next word of parameter 


MOV 


BX,4. 




MOV 


NUMBER (BX), AX ; 


store the value 


MOV 


AX,<BP+8) ; 


next word of parameter 


MOV 


8X,2. 




MOV 


NUMBER (8X), AX ; 


store the value 


MOV 


AX,CBP+10) ; 


first word of parameter... 






contains high-order byte 






of mantissa and the exponent 


MOV 


NUMBER, AX ; 


store the value 


<. do 


something with the number, in this case multiply it by ten... 


for 


example, increment the 


exponent by one > 


MOV 


AX, NUMBER 




INC 


AH 


exponent is high-order byte 


MOV 


NUMBER, AX 




-C the 


next section stores the new values into the stack for 


the 


function return to Pascal > 


MDV 


BX,6. 




MOV 


AX,NUMBER(BX) 




MOV 


<BP+12),AX 




MOV 


BX,4. 




MOV 


AX, NUMBER (BX) 




MDV 


(8P+14>,AX 




MOV 


BX,2. 
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MOV AX^NUMBERtBX) 

MOV (BP+16),AX 

MOV AX, NUMBER 

MOV (BP+18),AX 

RETL 8 

NUMBER .BLOCK 8 

.ENO 



Example 6: 

Passing Reals By Reference 



program 


va r 1 ab L e_pa s s i ng; 








var 


param: reat ; 








procedure real by reference 


(var 


on Ly_parameter: real); 


external; 


. begin 










param : 


:= 10.0; 








real_by_ref erencetparam) ; 








wr i teLnCparam: 








end. 










.iPROC 


REAL_BY__REFERENCE,1 


} 


one word of parameter 










a pointer to the real 










variable 




MOV 


BP^SP 


f 


f ami Liar 




MOV 


BX,(BP+4) 




mov the address of the 










variable into the 








r 


"address" register 




'• ■ MOV 


AX,SS:<BX+6) 


f ■ 


fetch the last word of 


the 








variable ( a four word 








r 


real, last word is six 










bytes offset ) 




INC 


AH 




increment the exponent. 










stored in the high order 






f 


byte 




MOV 


SS:<BX+6)VAX 




store the new value 




RETL 


2 








.END 
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Example 7: 

Passing Characters By Value 



program 


variable _pas$ing; 






function char by value (only parameter: char): char; external; 


begin 








writelnC char by value ( 


•a' 


' ) ) 


end. 








.FUNC 


CHAR_BY_yALUE,1 




one wprd of parameter 








the Low order byte 








contains the character 


mv 


BP^SP 




familiar 


HOV 


AX,C8P+4) 




get parameter 


INC 


AL 




increment the character — 








make an "A" a "B", 






/ 


and so forth 


MOV 


(BP+6),AX 


/ 


store value for function 








return 


RETL 


2 






.END 
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Example 8: 

Passing Characters By Reference 



program 


variabLe__passing; 




.. 


var 


param: char; 






procedure char by reference 


(var 


onLy parameter: char); externaL; 


begin 






pa ram ; 


s= -a"; 






char_by_ref erence (pa ram) ; 






wr i teln(param) 






end. 








.PROC 


CHAR_BY_REFERENCE,1 




one word of parameter 








is a pointer to a 








character variable 


MOV 


BP,SP 




f am i L i a r 


MOV 


BX,(BP+A> 




get the address of the 






/ 


actual variable 


MOV 


AX^SS: <BX) 




fetch the value of the 








variable 


INC 


AL 


r 


increment the character... 








for example, "A" to "B" 


WOV 


SS:(BX),AX 




restore variable 


RETL 


2 






.END 
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Example 9: 



Passing Arrays By Value 


prografn variable passings- 


type 


ary = array CI.. 103 of integer; 


var 


param: ary; 




i : integer; 


functi 


ion array_by_vaLue (onLy__parameter : ary): integer; external; 


beg i n 




for i 


i := 1 to 10 do paramTiD i; 


writelnCarray by vaLue Cparam)) 


end. 




. FUNC 


ARRAY_BY_VALUE,1 ; one word of parameter... 




; a regular array is always 




; passed by reference, ie. 




.; the address is the param^eter 


MOV 


BP,SP . . ; f aini liar 


MOV 


BX,(BP+4) ; load the address 


MOV 


AX,SS: (BX+18) ; fetch the Last word in the 




; array . ..off set of 9 words 




; from the initial element 


. MOV 


(BP+6),AX ; return the element in the 




; function return word 


RETL 


2 ; . " . . ■ . . ■ . ■ 


.Em 
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Exaniple 10: 

Passing Arrays By Reference 



program 


variabLej>assing; 




type 


ary - array CI . .103 of 


integer; 


var 


param: ary; 






i: integer; 




function array by reference (v; 


ir onLy_parameter : ary): integer; external; 


begin 




for i ; 


:= 1 to 10 do paramCi]] ; 


;= i ; 


wri telnCarray by reference Cparam)) 


end. 






.FUNC 


ARRAYBYREFERENCE^I 


; one word of parameter... 






; a regular array is always 






; passed by reference, for 






; example, the address is 






; the parameter 


MOV 


BP,SP 


; familiar 


MOV 


BX,<BP+4) 


; load the address 


MOV 


AX:,SS: (BX+18) 


; fetch the Last word in the 






; array. . .of f set of 9 words 






; from the initial element 


MOV 




; return the element in the 






; function return word 


RETL 


2 




.END 
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Example 11: 

Passing Packed Arrays By Value 



program variable_passing; 




type 


ary = packed array CI.. 


10] of 0..255; 


van 


pa ram: ary; 






i: integer; 




fL/nction packed array by value 


Conly parameter: ary): integer; external; 


begin 




for i ; 


:= 1 to 10 do paramCi] : 


= i; 


writeln(packed array by value 


(param)) 


end. 






.FUNC 


PA C KE D_A RR A Y_B Y_V A LUE , 1 


; one word of parameter... 






; a packed array of something 






; other than character is 






; passed as a regular array 


MOV 


BP,SP 


; familiar 


MOV 


BX,(BP+4) 


; load the address 


XOR 


AX, AX 


; zero AX 


HOV 


AL,SS:(BX+9) 


; fetch the last byte in the 






; array .. .of f set of 9 bytes 






; from the initial element 


MOV 


CBP+6),AX 


; return the element in the 






; function return word 


RETL 


2 




.END 
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Example 12: 

Passing Packed Arrays By Reference 



program variabLe passing; 


type 


ary = packed array CI., 103 of 0.,255; 


var 


pa ram: ary; 




i : i nteger; 


function packed array by reference 


Cvar 


onLyjjarameter : ary): integer; external; 


begin 


for. i 


*= 1 to 10 do paramCil := i; 


wri teLnCpacked array by reference Cparam)) 


end. 




.FUNC 


PACKEDJ\RRAY_BY_REFERENCE,1 ; one word of parameter... 




; a packed array of something 




; other than character is 




; passed as a regular array 


HOV 


BP,SP ; fam it Tar 


MOV 


BX,(BP+4) ; Load the address 


. XOR 


AX, AX ; zero AX 


MOV 


AL,SS:(BX+9) ; fetch the last byte in the 




; array, . .of f set of 9 bytes 




; from the initial element 


MOV 


CBP+6),AX ; return the element in the 




; function return word 


RETL 


2 _ 


.END 
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Example 13: 

Passing Strings or Packed 
Arrays of Character By Value 



program variabLe_passrng; 




function string by_value <onLy_ 


param: string): char; externaL; 


beg 7 n 






writeLnC 


string by value < 'something' ) ) 


• • end. 






.FUNC 


STRING„BY_VALUE,2 


; Identical to Packed 






; Array of Char by Value- '• ' 






; two words of parameters ' " 






; are a segjnent pointer 






; to the string parameter 


MOV 


BP,SP 


. ; familiar 


MOV 


AX,(BP+4> 


.; TOS...if NIL, for . 






; example/ ~ 0, next word - • •■ 






; is a pointer;, if not 






; NIL, for example, <> Q / 






; strange things. . . 


. . -C NIL 


is an implement at ion 


dependent value... he re it is ■ ■ 


■ ' ■ assumed to be equal to O.-.this may not necessarily - - • 


be 


the case > 




TEST 








EASY 




HARD 






•-*• { not 


NIL. ..therefore, is 


a pointer to a Segment 


Environment Record^ the 


third word of which is a 


- . - pointer to the SIB, hence, the 4 in the ne*;t 


Statement. The second word of the SiB is the 


pointer to the actual segment that contains the 


string. > 




MOV 


BX^AX 


; load "address" register 


-MOV 


DI^SS:(8X + 4) 


; get" address of SIB 


MOV 


BX,SS:tDI +2) 


; get address of base of 






. actual segment - 


Hov 


AX^(BP+6) 


; get next word of parameter,..- 






; this is the offset into 






; the actual segment for 






; the string 


" - ADD 


BX^AX 


; compute pointer to string... 






; <pointer to segment> plus 






; <offset> 




FOUN0 


; we now have, the addres_s. of. 






; the string in BX...jufnp 






; to do the work . . . ' ^ . ; v • 


'• -. " EASY 






C is 


NIL. , .therefore the second word on ■ ^ • 


•. . •• the 


stack is the pointer 


to the string > . . ' • ■ 


.'■ •• MOV 


BX^(BP+6) 




FOUND 






■C we 


now have the address 


of the string in BX > . ." " v 


KOR 


AX, AX 


; zero AX • 


MOV 


■ AL,SS:(BX+n 


; fetch the first character.... 






; ignore thef length byte 


■ MOV 


CBP+8),AX 


; put the character into the 






/■function return word 






; on the stack 


RETL 


4 




.END 
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Example 14: 

Passing Strings By Reference 



program 


vari abLe_passing; 




var 


pa raw I string; 




procedure string_by__ref erence 


(var onLy_paramt string); external; 


beglrv 






write( 


'» •); 




readlnCparam) ; 




string 


by reference (param); 




writeLn(param) 




end. 






.PROC 


STRING_BYJ?EFERENCE,1 


; one word of parameter 






; is the pointer to 






; a string 


MOV 


BP,SP 


; familiar 


MOV 


BX,(BP+4) 


; Load pointer into "address" 






; register 


XOR 


AX, AX 


; zero AX 


MOV 


AL,SS:(BX+1) 


; ignore Length byte and 






; move the first character 






; of the string into AX 


SUB 


AX,32. 


; turn a Loyercase character 






; into an uppercase character 






; ,..it is assumed that the 






; input string is in 






; Lowercase 


MOV 


SS: (BX+1),AL 


; restore the character 


RETL 


2 




.ENP 
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Example 15: 

Passing Packed Arrays 

of Character by Reference 











• program 


variab I Bypassing; 






. type 


ary = packed array 


CI.. 103 


of char; 


var 


param: ary; 






procedure packed__array_by_ 


reference 


(var only_parafn: ary); external; 


begin 








pa ram 


'= 'characters' ; 






packed 


array by_reference 


( param 


*) ■ 

' r 


wr iteln(param) 






end. 








.PROC 


PACKED ARRAY BY REFERENCE, 1 


; one word of parameter 








; is the poi nter to 
; a string 


. . nov 


BP,SP 




; familiar 


■ MOV 


BX,(BP+4) 




; load pointer into "address" 
; register 


XOR 


AX, AX 




; zero AX 


MOV 


AL,SS:(BX) 




; move the first character 
; of the packed array into AX 


SUB 


AX,52. 




; turn a Lowercase character 
; into an uppercase character 
; ...it is assumed that the 
; input packed array is in 
; Lowercase 


MOV 


SS:CBX),AL 




; restore the character . 


RETL 


2 






.END 
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Example 16 : 

Passing Records By Value 



program variabLe_passing; 




type 


rec = record 






i am 2nd,i am 1st: integer; 




i am 4th, i aro 3rd: char; 




end; 




var 


param: rec; 




function record_by_vaLue CoriLy_param: rec) : char; externaL; ■ ■ 


begin 






with param do 




begin 






1 an 


2nd :~ 1; . . . ■ 




i am_ 


1st := 2;.- 




i_am_ 


4th := 'a'; 




i_am_ 


3rd := 'b'; 




end; 






writeLn( record by value C param ) ) 


end. 






. .TUNC 


REC0RD_BY_VALUE,1 ; 


one word of parameter... a 






record is passed exactly 




_'.'../ 


the same whether it is a 






value or a reference 






parameter., .a pointer to the 






structure is on the top 




■ f 


of the stack 


ttOV 


BP,SP ■ ; 


f ami liar 


MOV 


BX,CBP+4> ; 


access the pointer 


MOV 


AX,SS: (BX) 


access the first word 






of the record. -.the last 












f ieLd_declaration_list, 






in this case an integer. 






done as an example 


-C the foLLowing i« an example of accessing another field 


in the record, in this case. 


the third word of the record ■ . - 


contains a char (the last variable in the second 


declaration list). As a char is stored in the 


Lou-order byte of the word. 


the offset should be even 


address of the word. > 




XOR 


DX,DX 


zero DX 


MOV 


DL,SS:(BX+4> 


access the character and 






store it in the Low-order 






byte of OX . . . : ^ 


MOV 


(BP+6)>DX '} 


place the character in the 






function return word 


RETL 


2 ■ . 




.END 
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Example 17: 

Passing Records By Reference 



program variabLe_j)assing 


f 


type .rec = record 




i am_2nd 


,i am_1st: integer; 


i_am_4th 


, i_am_3rd: char; 


end; 




var parara ; rec; 




procedure reco.r.d|_by_ref erence Cvar only_param: rec); external; 


begin 




with pa ram do 




begin 




. ■ i am__2nd := 1 ; 




i_afn__1st ;= 2; 




i_am__4th := 'a';. 




i_afn_3rd := 'bV; 




end; 




writeLn( 'before calf) 




with param do 




begin 




writeLnC ' i_am 1st 


',i_ani_1st); 


writelnCi am_2nd 


•,i_am_2nd); 


writeLnCi am_3rd 


',i_am_3rd>; 


w r i t e L n ( ' i__am_A th 


',i_am_4th) 


end; 




record by reference (param); 


writelnCafter caLL'); 




with param do 




begin 




writeLnC ' i_ani_1 St 


•,i am_1st); 


w r i t e Lr> ( ' i_am_2 nd 


• ,i_am_2nd) ; 


w r 1 1 e t n ( ' i__am_3 rd 


',i_am_3rd>; 


," .. . writeLn('i_am_4th 


',i_am__4th) 


end 




end. 




.PROC RECORD BY REFERENCE,! ; one word of parameter 




; is a pointer to a structure 


WQV BP,SP 


; familiar 


MOV BX,(BP+4) 


; access the parameter 


C this routine switches 


the values of the variables 


in the record.. .the first and second are both Integers 


and the third and the 


fourth are characters > 


MOV AX,SS:(BX) 


; get first word of record 


MOV OX^SS: (8X+2) 


; get second word of record 


HOV SS:<BX),[>X 


; restore 


MOV SS:(BX+2),AX 


; variables 


. XOR AX, AX 


; zero AX 


XOR [)X,DX 


; zero DX 


MOV AL,SS:(BX+4) 


; get low-order byte of 




; the thi rd word 


MOV DL,SS:<BX+6) 


- ; get low-order byte of 




; the fourth word 


MOV SS:(BX+4),DL 


; restore 
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.. «ov 


SS:<BX-Hi>^At 


; van' abt.es 


. RETL 


' 2 . 




. END 







Example 18: 

Multiple Parameter Passing 



program st rang e__pa rams; 




type rec = record 




fieldl: arrayC1-.103 


of integer; 


f ieLd2,,f.ield3: char; 




end; 




var parami ^param2: rec; 




1 : i nteger; 




procedure muLti_params 




(value rec: rec; var reference rec: rec); external; 


begin 




with parami do 




begin 




for i := 1 to 10 do fieldl Cil 


= i ; 


fieldZ := 'a'; 




field? 'b'; 




end; 




itiuLti_params ( parami ^paraiti2 ); 




with param2 do 




begin 




for i := 1 to 10 do writelnCelement',!,' ',f ieLdI Ci] ); 


. writelnCfieldZ ^fietda); 




writelnCf ieldS V,field3) 




end; 




end. 




.PROG MULTI_PARAMS,2 ; 


two words of parameters 




TOS 1s a pointer to a 




record passed as a reference 




pararaeter. . .TOS-1 is 




a pointer to a record 




passed as a value parameter 


mM BP,SP 




HOV BX^<BP+6) . ; 


access TOS-1 for the address 




of the value parameter 


MOV DI,CBP+4) ; 


access TOS for the address 




of the reference parameter 


ADO DI,18. ; 


the first field of the record 




is a ten element array of 




integers^ therefore the 




offset of the last element 




is 9 words or 18 bytes... 


. ■ . MOV CX,10. ; 


there are 10 elements in the 




array 
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■C the foiLowing Loop reads the 10 




eLements of the array 




in the 


value parameter 


and stores them in reverse order 




" . in the 


array in the reference parameter. .. that is why 




the offset of the Last 


element 


is needed (see above). > 




<;tart MOV 


AX^SS: (BX) 




; Load next element 




MOV 


SS:(DI),AX 








■■/I .• •. - INC 


BX . 




; the next element is 


" 


INC 


BX 




; 2 bytes offset . . 




DEC 


DI 




; back up to previous 




DEC 


DI 




; element... 2 bytes 




LOOPNZ 


START 




; decrement CX, if not 










; 0 then Loop to START 




ADD 


DI,22. 




; access next element past 










; the array in the reference 










; parameter 




MOV 


AX,SS:(BX) 




; load the next field from 










; the value parameter 




MOV 


SS: (DI+2),AX 




; store it in the last field 










; of the reference parameter 




MOV 


AX,SS:(BX+2) 




; load the Last field from 










; the value parameter 




MOV 


SS:(OI),AX 




; store it in the next-to-Last 










; field of the reference param 




RETL 


4 






-END 
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Example 19: 

Program to Determine NIL 

NIL is a machine-dependent value. If you want 
to determine what NIL is for your system, you 
can use the following Pascal program. Note that 
the value of NIL for each processor is listed in 
Appendix N, 



program ftrid nil; 




type tn'x = record 




case boolean of 




true: (x: integer); 




f alse: Cy : 


integer); 


end; 




var p: trix; 




begin 




p.y := nlL; 




writeLn (p.x); 




end, 
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USEFUL ROUTINES 



This section contains some example routines that 
might be found generally useful. 

function readport (port: integer): integer; external; 
procedure writport (port, value: integer); external; 
procedure readmentory 

(segmnt, offset: integer; var result: integer); external; 
"function Lookup (entry: integer): integer; external; 



The first routine, below, reads a byte from an 
I/O port. The second routine writes a byte to 
an I/O port. The third routine reads an 
arbitrary byte from memory. The last two 
routines work together to quickly look up an 
item in a table. 
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.FUN€ 


READPORT^I 




read byte I/O port 


PORT 


.EQU 




; 


port number to read from 


RESULT 


,EQU 


6 




result of function 


ENTRY 


KOV 


BP,SP 


V 


point to parameters 




MOV 


0X,(BP+PORT) 




fetch port number 




IN 


AL,DX 


• 


read byte from port 




XOR 


AH, AH 


f 


put zero to extend to word 




MOV 


(BP+RESULT),AX 




set returned resuLt 




RETL 


2 


/ 


cut stack by 2 bytes for parameter 




.PROC 


WRITP0RT,2 


1 


write byte I/O port 


VALUE 


.EQU 


4 


r 


value to wri te 


PORT 


.EQU 


6 








MOV 


BP,SP 








MOV 


DX^CBP+PORT) 








MOV 


AL,(BP+VALUE> 




fetch value to write 




OUT 


[)X,AL 


■ 


byte output value 




RETL 


4 


• 


cut back two parameters words 




.RELPRdC 


READMEH0RY,3 . 




read word of memory 


VARPTR 


.EQU 


4 




pointer to variable 


OFFSET 


.EQU 


6 


f 


pointer to memory 


SEGMENT 


.EQU 


8 




segment of memory 




MOV 


BP^SP 


t 


point to parameters 




LOS 


BX,(BP+OFFSET> 


I 


fetch extended pointer 




MOV 


AX,CBX) 


/ 


memory word 




MOV 


DI^(BP+VARPTR) 


r 


pointer to variable 




MOV 


SS:(OI),AX 


/ 


store in variable in stack segment 




RETL 


6 


r 


pop three parameters 




.RELPROC 


PRIMES 








.DEF 


TABLE 






TABLE 


.WORD 


1,2,3,5,7,11,13,17,23 




.RELFUNC 


LOOKUP, 1 








.REF 


TABLE 






LAST 


.EQU 


8 






ENTRY 


.EQU 


4 






RESULT 


.EQU 


6 








MOV 


BP,SP 








MOV . 


BX,(BP+ENTRY) 




fetch index 




CMP 


BX,LAST 




check range 




J A 


$01 




do nothing if too high 




MOV 


SI,8X 


f 


*opy to index register 




MOV 


AX, TABLE (BX) (SI) 




tricky word index 




MOV 


C8P+RESULT),AX 


t 


store result 


toi 


RETL 


2 








.END 
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6502 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parajneters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must ,EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: JjC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unreloca table 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in macros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41 : string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no rocm on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: ' = ' or expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNC expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: LC not word-aligned 

76: index register required 

77: 'X' or 'Y' expected 

78: zero-page address required 

79: illegal use of register 

80: index register expected 

81: ill-formed operand 

82: 'X' expected for indexed addressing 

83: must use 'X' index register 

84: must use 'Y' index register 
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6800 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQp before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro paranieter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: Include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in mcros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no room on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

66: nested macro definitions not allowed 

66: ' = ' or ' <> * expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNC expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: IC not word-aligned 

76: 'X' expected for indexed addressing 

77: 'A' or 'B' expected 

7ft: invalid operand 

79: cornna expected 
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6809 SYNTAX ERROES 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of paranieters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: maist be declared in -ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: IC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in macros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no room on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: * = ' or * <> * expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNC expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: IX^ not word-aligned 

76: immediate operand expected 

77: invalid register list entry 

78: operand must be indexed 

79: invalid index register 

80: no offset allowed 

81: indirect not allowed 

82: invalid offset register 

83: invalid offset 

84: immediate not allowed 

85: registers are incompatible 
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8080 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unreloca table 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: •INCLiUDE not allowed in macros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no room on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: or * <>* expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNG expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: LC not word-aligned 
76: invalid operand 
77: comma expected 



APPENDIX H 
9900 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must •EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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unexpected end of input 

.INCLLTDE not allowed in macros 

label expected 

expected local label 

local label stack overflow 

string constants must be on single line 

string constant exceeds 80 characters 

cannot handle this relocate count 

no local labels in ,ASECT 

expected key word 

string expected 

I/O - bad block, parity error (CRC) 

I/O - illegal unit number 

I/O - illegal operation on unit 

I/O - undefined hardware error 

I/O - unit no longer on-line 

I/O - file no longer in directory 

I/O - illegal file name 

I/O - no rocm on disk 

I/O - no such unit on-line 

I/O - no such file on volume 

I/O - duplicate file 

I/O - attempted open of open file 

I/O - attempted access of closed file 

I/O - bad format in real or integer 

I/O - ring buffer overflow 

I/O - write to write-protected disk 

I/O - illegal block number 

I/O - illegal buffer address 

nested macro definitions not allowed 

or ' <> * expected 
may not equate to undefined labels 
.ABSOLUTE must appear before 1st proc 
,mOC or .FUNG expected 
too many procedures 
only absolute expressions in .ASECT 
must be label expression 
no operands allowed in .ASECT 
offset not word-aligned 
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75: IjC not word-aligned 

76: illegal immediate operand 

77: index must be WR 

78: close paren ')' expected 

79: indirect & autoincr must be WR 

80: autoincr must be WR indirect 

81 : conma ' , ' expected 

82: no operand allowed 

83: illegal map file 

84: WR expected 
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LSI-ll/PDP-11 SYNTi^ EREORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on soiu'ce line 

6: input line over 80 characters 

7: unmatched conditional ass€f!ibly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: IC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in macros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in •ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

4fc I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O ~ unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file naine 

54: I/O - no room on disk 

55: I/O - BO such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O ~ attempted open of open file 

59: I/O - atterr^)ted access of closed file 

60: I/O - bad format in r^al or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: * = ' or * <> * expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNG expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: ]jC not word-aligned 

76: close paren ')' expected 

77: register expected 

78: too many special symbols 

79: iinrecognizable operand 

80: register reference only 

81: first operand must be register 

82: comna ' , ' expected 

83: unimplemented instruction 

84: must branch backwards to label 
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Z8 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: invalid radix 

12: mast .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unreloca table 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in macros 

38: label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51: I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no room on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61: I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: ' =' or * <> ' expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNC expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: only labels equated to .DEFs 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: LC not word-aligned 

76: too many symbols 

77: operand expected 

78: bad data value 

79: ")" expected 

80: bad operand type 

81: odd register 

82: unknown instruction 

83: working register expected 

84: indirect or register expected 

85: condition code expected 
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Z80 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parajneters expected 

5 : extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: must be declared in .ASECT before used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: bill-formed expression 

27: not enough operands 

28: LC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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36: unexpected end of input 

37: .INCLUDE not allowed in macros 

38; label expected 

39: expected local label 

40: local label stack overflow 

41: string constants must be on single line 

42: string constant exceeds 80 characters 

43: cannot handle this relocate count 

44: no local labels in .ASECT 

45: expected key word 

46: string expected 

47: I/O - bad block, parity error (CRC) 

48: I/O - illegal unit number 

49: I/O - illegal operation on unit 

50: I/O - undefined hardware error 

51; I/O - unit no longer on-line 

52: I/O - file no longer in directory 

53: I/O - illegal file name 

54: I/O - no room on disk 

55: I/O - no such unit on-line 

56: I/O - no such file on volume 

57: I/O - duplicate file 

58: I/O - attempted open of open file 

59: I/O - attempted access of closed file 

60: I/O - bad format in real or integer 

61; I/O - ring buffer overflow 

62: I/O - write to write-protected disk 

63: I/O - illegal block number 

64: I/O - illegal buffer address 

65: nested macro definitions not allowed 

66: * =' or * <> ' expected 

67; may not equate to undefined labels 

68: .ABSOLUTE must appear before 1st proc 

69: .PROC or .FUNC expected 

70: too many procedures 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 
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75: liC not word-aligned 

76: incorrect operand format 

77: close paren ')' expected 

78: comma ' , ' expected 

79: plus ' + ' expected 

80 : open paren ' ( ' expected 

81: stack pointer 'SP' expected 

82: 'HL' expected 

83: illegal 'cc* condition code 

84: register 'C expected 

85: register expected 'r' 

86: register 'A' expected 
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8086/88/87 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly 
directive 

8: must be declared in .ASECT before 
used 

9: identifier previously declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro paranieter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: ijC-realtive to absolutes 

unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 
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33: invalid key word 

34: unmatched macro definition 

directive 
35: include files may not be nested 
36: unexpected end of input 
37: .INQjUDE not allowed in macros 
38: label expected 
39: expected local label 
40: local label stack overflow 
41: string constants must be on 

single line 
42: string constants exceeds 80 

characters 
43: cannot handle this relocate count 
44: no local labels in .ASECT 
45: expected key word 
46: string expected 
47: I/O - bad block, parity 

error (CRC) 
48: I/O — illegal unit number 
49: I/O — illegal operation 

on unit 

50: I/O — undefined hardware 
error 

51: I/O — unit no longer 
on-line 

52: I/O — file no longer in 

directory 
53: I/O - illegal file naiT>e 
54: I/O — no room on disk 
55: I/O — no such unit on-line 
56: I/O -- no such file on volume 
57: I/O — duplicate file 
58: I/O — attempted open of open 

file 

59: I/O — attempted access of closed file 
60: I/O — bad format in real or integer 
61: I/O — ring buffer overflow 
62: I/O — write to write-protected disk 
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63: I/O — illegal block number 

64: I/O — illegal buffer address 

65: nested macro definitions not allowed 

66: or expected 

67: may not equate to undefined labels 

68: .ABSOLUTE must appear before first proc 

69: .PROC or .FUNG expected 

70: to many procedures (more than 10) 

71: only absolute expressions in .ASECT 

72: must be label expression 

73: no operands allowed in .ASECT 

74: offset not word-aligned 

75: LC not word-aligned 

76: had label, open parenthesis then 

illegality 
77: expected absolute expression 
78: both operands cannot be a seg register 
79: illegal pair of index registers 
80: have to use BX, BP, SI or DI 
81: illegal constant as first operand 
82: the first operand is needed 
83: the second operand is needed 
84: expected comma before second 

operand 

85: registers stand-alone except in 
indirect 

86: only two registers per operand 

87: expected label or absolute 

89: close parenthesis expected 

90: cannot POP CS 

91: cannot have xchg r8 with rl6 

92: segment registers not allowed 

93: ESC external operand on left rmst 

be constant <64 
94: only one of operands can have 

segment override 
95: right operand must be a memory 

location 
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96: left operand must be a 16 bit 
register 

97: left operand must be memory or 

register alone 
98: operand cannot be a segment or 

inmediate 
99: count must be 1 or in CL 
100: a byte constant operand is 
required 

101: operand must use ( ) or be a 
label 

102: LOCK followed by something 
illegal 

103: REP precedes only string 

operations 
104: not implemented 
105: expected a label 
106: 

107: open parenthesis expected 
108: expected register alone as right 
operand 

109: segovpre then regalone, that's 
illegal 

110: only one operand allowed 
111: operands are AL,,op2 for byte 
MUL , etc . 

112: SP can only be used with the SS 
segment 

113: MOVBIM only for immediate to 
memory 

114: BIMs must be immediate bytes to 
memory 

115: MOV immediate to Segment Register 

not allowed 
116: Segment Register expected 
117: (8087) invalid two-operand format 
118: (8087) invalid single operand 

format 

119: (8087) inproper operand field 
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120: (8087) instruction has no operands 
121: no override of ES on string 

destination 
122: intersegment jump or call needs 2 

constant or external operands 
123: I/O port must be immediate byte 

or DX 

124: I/O source-destination register 

must be AL or AX 
125: prefix must be on same line as code 
126: register expected as first token 

after 
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68000 SYNTAX ERRORS 



1: undefined label 

2: operand out of range 

3: must have procedure name 

4: number of parameters expected 

5: extra symbols on source line 

6: input line over 80 characters 

7: unmatched conditional assembly directive 

8: miust be declared in .ASECT before used 

9: identifier previoiisly declared 

10: improper format 

11: illegal character in text 

12: must .EQU before use if not to a label 

13: macro identifier expected 

14: code file too large 

15: backwards .ORG not allowed 

16: identifier expected 

17: constant expected 

18: invalid structure 

19: extra special symbol 

20: branch too far 

21: LC-relative to externals not allowed 

22: illegal macro parameter index 

23: illegal macro parameter 

24: operand not absolute 

25: illegal use of special symbols 

26: ill-formed expression 

27: not enough operands 

28: IjC-relative to absolutes unrelocatable 

29: constant overflow 

30: illegal decimal constant 

31: illegal octal constant 

32: illegal binary constant 

33: invalid key word 

34: unmatched macro definition directive 

35: include files may not be nested 
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unexpected end of input 

.INa_,UDE not allowed in macros 

label expected 

expected local label 

local label stack overflow 

string constants must be on single line 

string constant exceeds 80 characters 

cannot handle this relocate count 

no local labels in .ASECTT 

expected key word 

string expected 

I/O - bad block, parity error (CRC) 

I/O - illegal unit number 

I/O - illegal operation on unit 

I/O - undefined hardware error 

I/O - unit no longer on-line 

I/O - file no longer in directory 

I/O - illegal file nairie 

I/O - no room on disk 

I/O - no such unit on-line 

I/O - no such file on volume 

I/O - duplicate file 

I/O - attempted open of open file 

1/0 - attempted access of closed file 

I/O - bad format in real or integer 

I/O - ring buffer overflow 

I/O - write to write-protected disk 

I/O - illegal block number 

I/O - illegal buffer address 

nested macro definitions not allowed 

* = ' or * <> * expected 

may not equate to undefined labels 

.ABSOLUTE must appear before 1st proc 

.PROC or .FUNC expected 

too many procedures 

only absolute expressions in .ASECT 

must be label expression 

no operands allowed in .ASECT 

offset not word-aligned 
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75: IC not word-aligned 

76: unrecognizable address mode 

77: address register expected 

78: close paren expected 

79: displacement out of range 

80; index register expected 

81: illegal length qualifier 

82: illegal source address mode 

83: illegal destination address mode 

84 : connma ' , ' expected 

85: length qualifier required 

86: length qualifier not allowed 

87: data register expected 

88: label expected 

89: illegal register list 

90: iniTiediate operand expected 
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NIL POINTER VALUES 



The following table lists the value designated 
as NIL for each processor. A NIL pointer (a, 
pointer variable which is assigned the value 
NIL) is uninitialized or points to nothing. 



Z80 

8080 

6502 

6809 

68000 

HP-87 

PDP-11 

9900 

8086 



0001 
0001 
0000 
0000 
0000 
0000 
FOOl 
0000 
0000 
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